
Net::Whois::ARIN::Contact - ARIN whois Contact record class

use Net::Whois::ARIN::Contact;
my $poc = Net::Whois::ARIN::Contact->new(
Name => 'Caine, Todd',
Handle => 'TCA53-ARIN',
Company => 'Electric Lightwave',
Address => '4400 NE 77th Ave',
City => 'Vancouver',
StateProv => 'WA',
PostalCode => '98662',
Country => 'US',
Comment => '',
RegDate => '1995-07-25',
Updated => '2001-05-17',
Phone => '503-555-1212',
Email => 'nobody@nobody.net',
);
printf "The ARIN contact handle for %s is %s.\n",
$poc->Name,
$poc->Handle;

The Net::Whois::ARIN::Contact module is simple class which is used to store the attributes of a point-of-contact record in ARIN's Whois server. Each attribute of the contact record has an accessor/mutator of the same name.

print $o->dump;

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 u nder the same terms as Perl itself.