/ 
Net-Subnets-0.12
/ Net::Subnets

NAME

Net::Subnets - Match large lists of IP addresses against many CIDR subnets

SYNOPSIS

use Net::Subnets;
my $sn = Net::Subnets->new;
$sn->subnets(\(qw(10.0.0.0/24 192.168.0.0/24)));
if (my $subnetref = $sn->check(\('10.0.0.1') {
    ...
}

DESCRIPTION

Very fast matches large lists of IP addresses against many CIDR subnets.

The following functions are provided by this module:

new()
    Creates an "Net::Subnets" object.
    It takes no arguments.

subnets(\@subnets)
    The subnets() function lets you prepare a list of CIDR subnets.
    It takes an array reference.

check(\$address)
    The check() function lets you check an IP address against the
    previously prepared subnets.
    It takes a scalar reference and returns a scalar reference to
    the first matching CIDR subnet.

AUTHOR

Sebastian Riedel (sri@cpan.org), Juergen Peters (juergen.peters@taulmarill.de)

COPYRIGHT

Copyright 2003 Sebastian Riedel & Juergen Peters. All rights reserved.

This library is free software. You can redistribute it and/or modify it under the same terms as perl itself.