Компьютерный форум NoWa.cc

Компьютерный форум NoWa.cc (http://nowa.cc/index.php)
-   Perl (http://nowa.cc/forumdisplay.php?f=306)
-   -   (Perl) nslookup (http://nowa.cc/showthread.php?t=156732)

Serdg 10.04.2008 17:40

(Perl) nslookup
 
Попробовал примеры с сайта 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 15.04.2008 16:01

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

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

Pol Pavel 22.08.2009 21:44

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


Текущее время: 22:53. Часовой пояс GMT +3.

Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc. Перевод: zCarot
Copyright ©2004 - 2021 2BakSa.WS

Время генерации страницы 0.10692 секунды с 9 запросами