Net::Whois::ARIN::Network - ARIN whois Network record class
use Net::Whois::ARIN::Network; my $net = Net::Whois::ARIN::Network->new( OrgName => 'Electric Lightwave Inc', OrgID => 'ELIX', Address => '4400 NE 77th Ave', City => 'Vancouver', StateProv => 'WA', PostalCode => '98662', Country => 'US', RegDate => '1995-07-25', Updated => '2001-05-17', NetRange => '18.104.22.168 - 22.214.171.124', CIDR => '126.96.36.199/16', NetName => 'ELI-NETBLK5', NetHandle => 'NET-207-173-0-0-1', Parent => 'NET-207-0-0-0-0', NetType => 'Direct Allocation', NameServer => 'NS.ELI.NET', Comment => 'ADDRESSES WITHIN THIS BLOCK ARE NON-PORTABLE', ); printf "%s was given a %s of %s by ARIN.\n", $net->OrgName, lc $net->NetType, $net->CIDR;
The Net::Whois::ARIN::Network module is simple class which is used to store the attributes of an Network record in ARIN's Whois server. Each attribute of the Network record has an accessor/mutator of the same name.
This method accepts a list of Net::Whois::ARIN::Contact instances and associates these objects with the Network record. If no arguments are specified, the method returns a list of Net::Whois::ARIN::Contact objects.
These methods are the accessors/mutators for the fields found in the Whois record.
Todd Caine <todd.caine at gmail.com>
Copyright (c) 2004 Todd Caine. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.