Liz::Whois - Perform Whois queries on any top level domain in the world
use Liz::Whois;
$text = new Liz::Whois;
#!/usr/local/bin/perl
use Liz::Whois;
$text = new Liz::Whois; $text = $text->Query( 'xxlink.nl' );
The Liz::Whois package allows an easy to use interface for obtaining information about all the whois registries and databases for all top level domains in the world. It can do this by a built in database with knowledge about whois and http servers that supply this information.
The following methods are the basic methods of the Liz::Whois module.
Create a new Liz::Whois object.
1 instantiated object
$text = new Liz::Whois; $text = Liz::Whois->new;
The following method perform the query.
Perform a whois (or similar) query to obtain information about the indicated domain.
1 top level domain to obtain information about
1 reference to list of texts of whois query 2 reference to list of commands executed to obtain the info
($text,$command) = $text->Query( 'xxLINK.nl' );
foreach (0..$#$text) {
print "$$command[$_]:\n$$text[$_]\n";
}
Defaults to printing the texts found if no return parameters are specified.
The following methods return information about the object, usually after a Query has been done..
Return the country of the last Query performed.
1 country of the last query
$country = $whois->Country;
Set or return the default whois server to be used.
1 new whois server (default: no change)
1 current/previous whois server
$whois->Default( 'whois.internic.net' ); $default = $whois->Default;
Return the domain of the last Query performed.
1 domain last checked
$domain = $whois->Domain;
Return the reason why the .nl domain of the last Query is blocked.
1 reason why a .nl domain is blocked
$reason = $whois->Reason;
Return the server information of the last Query.
1 reason why a .nl domain is blocked
$reason = $whois->Reason;
Return the top level of the Domain of the last Query.
1 reason why a .nl domain is blocked
$toplevel = $whois->TopLevel;
Elizabeth Mattijsen ( lizperl@INC.nl )
With contributions by:
- Hayo Rubingh ( hayo@xxLINK.nl )
(C) 1999-2000 International Network Consultants
Fixed whois server name for the .nl domain. Also fixed problem with non-existing .COM, .NET, .ORG and .EDU domains: they are now correctly returned.
Now properly handles uppercase domain-names.
Added support for InterNIC sub-registries.
Now no longer puts Exporter in ISA: it was not needed.
Added support for looking up IP-number ownership to method Query.
Added method Country, which returns the country of the last Query.
First version of this true Perl module, based on routines developed in several internal user scripts.