From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

NAME

Net::GrpNetworks - Perl extension to determine in which network group a IP belongs to.

SYNOPSIS

$grpnet = new Net::GrpNetworks();
$grpnet->add(group name, network block, netmask);
$GroupName = $grpnet->find(IP);

DESCRIPTION

Net::GrpNetworks creates network groups and allows researching for specific IPs discovering in which network group each IP belongs to.

For example:

$grpnet = new Net::GrpNetworks();
$grpnet->add("New York", "210.210.10.0", "255.255.255.0");
$grpnet->add("New York", "210.210.11.0", "255.255.255.0");
$grpnet->add("New York", "210.210.12.0", "255.255.254.0");
$grpnet->add("Rio de Janeiro", "200.255.49.128", "255.255.255.128");
$grpnet->add("Rio de Janeiro", "200.255.50.0", "255.255.252.0");
$grpnet->add("Rio de Janeiro", "200.255.60.0", "255.255.255.0");
$City = $grpnet->find("200.255.60.10"); # $City will be set to "Rio de Janeiro"
if ( $City = $grpnet->find("210.210.9.5") ) # Will be false

COPYRIGHT

Copyright (c) 1997 Andre Rodrigues Viegas. All rights reserved. This
program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.

AUTHOR

Andre R. Viegas, andre.viegas@writeme.com.br