Corris Randall > Net-Whois-Raw > pwhois

Download:
Net-Whois-Raw-0.23.tar.gz

Annotate this POD

CPAN RT

Open  0
View/Report Bugs
Source  

NAME ^

pwhois - Perl written whois client

SYNOPSIS ^

        pwhois perl.com
        pwhois gnu.org
        pwhois -s police.co.il
        pwhois -c there.is.no.tld.called.foobar
        pwhois yahoo.com whois.networksolutions.com
        pwhois -T 10 funet.fi

etc etc.....

DESCRIPTION ^

Just invoke with a domain name, optionally with a whois server name. The -s switch attempts to strip the copyright message or disclaimer. The -c switch attempts to return an empty answer for failed searches. The -T switch takes a parameter that is used for the timeout for connection attempts.

AUTHOR ^

Ariel Brosh, schop@cpan.org

SEE ALSO ^

Net::Whois::Raw.

END_OF_SCRIPT use Config;

my $file = __FILE__; $file =~ s/\.PL$//;

$script =~ s/\~(\w+)\~/$Config{$1}/eg; if (!(open(FILE, ">$file")) || !(print FILE $script) || !(close(FILE))) { die "Error while writing $file: $!\n"; } chmod 0755, $file; print "Extracted $file from ",__FILE__," with variable substitutions.\n";

syntax highlighting: