Hi,

whats wrong with using gethostbyaddr from the Socket package? A lot easier, 
faster and slicker. Have you looked at this? 

perldoc -f gethostbyaddr


 use Socket;

 sub dnsLookup {
        my $ip = shift;
        $iaddr = inet_aton($ip); # or whatever address
        $name  = gethostbyaddr($iaddr, AF_INET);
        return $name;
 }

 $ip = "172.20.2.68"
 $hostname = dnsLookup($ip);
 print "ip = $ip        host = $hostname\";

may be you remeber the short discussion that we had on personal emails some 
weeks ago. Zone xfers are ok, if you administrate the name server and if 
you are allowed to initiate the zone transfer. But normally you are not 
allowed to. And if you would be allowed to, then you can also just get a 
copy of the zone file and grep through it. So you are stuck with nslookup 
and things that behave like this. Get rid of dig, nslookup and so on. The 
extra resources needed to start up the binaries and grepping through the 
output, is a waste of power. 

Best regards,
Oliver

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to