#!/usr/bin/perl -w use Net::Whois::IP qw(whoisip_query); my $ip = "127.0.0.1"; my $tt = 0; my @tyy; my $response = whoisip_query($ip); foreach (sort keys(%{$response}) ) { print "$_ $response->{$_} \n"; $tyy[$tt] = "$_ $response->{$_} \n"; $tt++; }
Also it returns the following for the localhost :
Address 4676 Admiralty Way, Suite 330
CIDR 127.0.0.0/8
City Marina del Rey
Comment Please see RFC 3330 for additional information.
Country US
NetHandle NET-127-0-0-0-1
NetName LOOPBACK
NetRange 127.0.0.0 - 127.255.255.255
NetType IANA Special Use
OrgAbuseEmail abuse@iana.org
OrgAbuseHandle IANA-IP-ARIN
OrgAbuseName Internet Corporation for Assigned Names and Number
OrgAbusePhone +1-310-301-5820
OrgID IANA
OrgName Internet Assigned Numbers Authority
OrgTechEmail abuse@iana.org
OrgTechHandle IANA-IP-ARIN
OrgTechName Internet Corporation for Assigned Names and Number
OrgTechPhone +1-310-301-5820
Parent
PostalCode 90292-6695
RegDate
StateProv CA
Updated 2002-10-14
So my question to you is - what is the constant unique part of that reasult for my or anyone's IP ?
2004-10-19 Edited by Arunbear: Changed title from 'The constant and unique part of the whois data.'
In reply to (OT) The constant and unique part of the whois data. by chiburashka
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |