[29460] in North American Network Operators' Group
Re: WHOIS source? (fwd)
daemon@ATHENA.MIT.EDU (Steve Sobol)
Fri Jun 23 19:03:32 2000
Message-ID: <3953ECD2.DE4B77A0@NorthShoreTechnologies.net>
Date: Fri, 23 Jun 2000 19:03:46 -0400
From: Steve Sobol <sjsobol@NorthShoreTechnologies.net>
MIME-Version: 1.0
To: System Administrator <root@again.net>
Cc: atatat@atatdot.net, nanog@merit.edu,
sjsobol@NorthShoreTechnologies.net
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Errors-To: owner-nanog-outgoing@merit.edu
System Administrator wrote:
>
> oops, forgot the signal & timer, so here it is..
>
> #!/usr/bin/perl5 -
> eval {
> $SIG{'INT'}= 'exit'; # exit on any funny business
> alarm(30); # watchdog timer
> chomp($query=<>);
> dbmopen(%whois,"whoisdatabase",undef);
> $answer=$whois{$query}||"what's that?\r\n";
> dbmclose(%whois);
> print($answer);
> }
> __END__
>
> ps: im using the free mysql db from www.mysql.com for this under fbsd 4.0
I am using MySQL too. Having looked at some of the source code, I've
decided it will be easier to maintain code I wrote myself - my needs
are very basic.
--
North Shore Technologies, Cleveland, OH
http://NorthShoreTechnologies.net
Steve Sobol, BOFH - President, Chief Website Architect and Janitor
Spammers and Net-abusers: Don't bother asking me for service. See
http://NorthShoreTechnologies.net/go/policy/ for more information.
