Ariel Brosh (PAUSE Custodial Account) > Net-Whois-Raw-0.21 > Net::Whois::Raw



Annotate this POD


Open  0
View/Report Bugs
Module Version: 0.21   Source   Latest Release: Net-Whois-Raw-2.91


Net::Whois::Raw - Perl extension for unparsed raw whois information


  use Net::Whois::Raw;
  $s = whois('');
  $s = whois('');
  $s = whois('');

  $OMIT_MSG = 1; # This will attempt to strip several known copyright
                messages and disclaimers sorted by servers.
                Default is to give the whole response.

  $OMIT_MSG = 2; # This will try some additional stripping rules
                if none are known for the spcific server.

  $CHECK_FAIL = 1; # This will return undef if the response matches
                one of the known patterns for a failed search,
                sorted by servers.
                Default is to give the textual response.

  $CHECK_FAIL = 2; # This will match against several more rules
                if none are known for the specific server.

  $CACHE_DIR = "/var/spool/pwhois/"; # Whois information will be
                cached in this directory. Default is no cache.

  $CACHE_TIME = 24; # Cache files will be cleared after not accessed
                for a specific number of hours. Documents will not be
                cleared if they keep get requested for, independent
                of disk space. Default is not to clear the cache.

  $USE_CNAMES = 1; # Use to get the whois server
                name when possible. Default is to use the 
                hardcoded defaults.

  $TIMEOUT = 10; # Cancel the request if connection is not made within
                a specific number of seconds.

  Note: as of version 0.21, extra data will be loaded only if the
  OMIT_MSG or CHECK_FAIL flags were used, in order to reduce memory usage.


Net::Whois::Raw queries NetworkSolutions and follows the Registrar: answer for ORG, EDU, COM and NET domains. For other TLDs it uses the namespace. ($

Setting the variables $OMIT_MSG and $CHECK_FAIL will match the results against a set of known patterns. The first flag will try to omit the copyright message/disclaimer, the second will attempt to determine if the search failed and return undef in such a case.

IMPORTANT: these checks merely use pattern matching; they will work on several servers but certainly not on all of them.

(This features were contributed by Walery Studennikov


Ariel Brosh,, Inspired by available on the net.


Fixed regular expression to match hyphens. (Peter Chow,

Added support for Tonga TLD. (.to) (Peter Chow,

Added support for reverse lookup of IP addresses via the ARIN registry. (Alex Withers

This will work now for RIPE addresses as well, according to a redirection from ARIN. (Philip Hands, Trevor Peirce

Added the pattern matching switches, (Walery Studennikov

Modified pattern matching, added cache. (Tony L. Svanstrom


As NetworkSolutions got most of the domains of InterNic as legacy, we start by querying their server, as this way one whois query would be sufficient for many domains. Starting at or will result in always two requests in any case.


Some users complained that the die statements in the module make their CGI scripts crash. Please consult the entries on eval and die on perlfunc about exception handling in Perl.


Copyright 2000-2002 Ariel Brosh.

This package is free software. You may redistribute it or modify it under the same terms as Perl itself.

I apologize for any misunderstandings caused by the lack of a clear licence in previous versions.


Not available anymore.


Notice that registrars forbid querying their whois servers as a part of a search engine, or querying for a lot of domains by script. Also, omitting the copyright information (that was requested by users of this module) is forbidden by the registrars.


perl(1), Net::Whois, whois.

syntax highlighting: