(Perl) nslookup

[Serdg]

Попробовал примеры с сайта cpan:

#!/usr/bin/perl -w
use Net::Nslookup;

my $a  = nslookup(host => "use.perl.org", type => "A");
my @mx = nslookup(domain => "perl.org", type => "MX");
my @ns = nslookup(domain => "perl.org", type => "NS");
my $name = nslookup(host => "206.33.105.41", type => "PTR");

print "A= $a\n";
print "MX= @mx\n";
print "NS= @ns\n";
print "IPaddr= $name\n";

Первые три строки отрабатываются нормально, а вот последняя, которая нужна больше всего возвращает пустой результат, кто подскажет почему?

[root@localhost test]# ./nsl.pl
A= 66.35.250.197
MX= mx.develooper.com
NS= 92.243.1.21 63.251.223.177 67.19.103.171 216.52.237.236
Use of uninitialized value in concatenation (.) or string at ./nsl.pl line 22.
IPaddr=

Или черкните строчку, с помощью которой я могу получить имя машины по ip-шнику, например чтобы запрос вернул testarm.mydomain.ru по ip 10.17.0.5

[chorny]

Этот IP вообще не отвечает - он может и не иметь обратной записи. Но я попробовал другие - всё равно не работает. Стоит послать сообщение об ошибке.

P.S. Попробуй Net::DNS.

[Pol Pavel]

Гыгы) А у меня всё работает))) Только не так))) Пишите правильно))))))