Попробовал примеры с сайта 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