Компьютерный форум NoWa.cc Здесь может быть Ваша реклама
Правила Форума
редакция от 22.06.2020
Портал .::2BakSa.WS::.
Вернуться   Компьютерный форум NoWa.cc > В помощь вебмастеру > Веб - Программирование > Perl

Уважаемые пользователи nowa.cc и 2baksa.ws. У нас сложилось тяжёлое финансовое положение. Мы работаем для вас вот уже более 15 лет и сейчас вынуждены просить о помощи. Окажите посильную поддержку проектам. Мы очень надеемся на вас. Реквизиты для переводов ниже.
Webmoney Webmoney WMZ: 826074280762 Webmoney WME: 804621616710
PayPal PayPal_Email E-mail для связи по вопросу помощи
Кошелёк для вашей помощи YooMoney 4100117770549562
YooMoney Спасибо за поддержку!
Ответ
 
Опции темы Опции просмотра Language
Старый 10.04.2008, 17:40   #1
Пользователь
 
Аватар для Serdg
 
Пол:Мужской
Регистрация: 20.09.2005
Сообщений: 109
Репутация: 31
По умолчанию (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
Serdg вне форума
 
Ответить с цитированием Вверх
Здесь может быть Ваша реклама
Здесь может быть Ваша реклама


Реклама: Рекомендуем КНС - geforce 1050 ti - билеты на футбол в подарок каждому покупателюгалтовка услуга в москвемюзиклы для детей в москве афишадома в стиле барнхаус проекты и ценыррв


Старый 15.04.2008, 16:01   #2
chorny
Неактивный пользователь
 
Пол:Мужской
Регистрация: 28.12.2007
Сообщений: 43
Репутация: 9
По умолчанию Ответ: (Perl) nslookup

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

P.S. Попробуй Net::DNS.
chorny вне форума
 
Ответить с цитированием Вверх
Старый 22.08.2009, 21:44   #3
Pol Pavel
Неактивный пользователь
 
Пол:Мужской
Регистрация: 12.10.2008
Адрес: Дома
Сообщений: 4
Репутация: 0
По умолчанию Re: (Perl) nslookup

Гыгы) А у меня всё работает))) Только не так))) Пишите правильно))))))
Pol Pavel вне форума
 
Ответить с цитированием Вверх
Ответ

Опции темы
Опции просмотра

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Редакторы для Perl Pilat66 Perl 11 07.03.2011 12:12
Perl + TOR roddik Perl 3 11.09.2009 13:05
Программирование на Perl scromniaga Perl 16 30.08.2009 04:27
(PERL) fetch_array Serdg Perl 2 22.08.2009 21:48
About Perl Ivan_32 Программирование 2 04.07.2008 11:22

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


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


Copyright ©2004 - 2024 2BakSa.WS

Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2024, vBulletin Solutions, Inc. Перевод: zCarot
Время генерации страницы 0.13838 секунды с 11 запросами