forum.opennet.ru

Составление сообщения

Исходное сообщение

"Как в perl выполнить DNS преобразование IP в имя и наоборот."
Отправлено Кирилл_Н, 12-Авг-10 13:25

  use Net::DNS;
  my $res   = Net::DNS::Resolver->new;
  my $query = $res->search("www.test.ru");
  if ($query)
  {
     foreach my $rr ($query->answer)
     {
        next unless $rr->type eq "A";
        print $rr->address, "\n";
     }
  }
Возвращает не один адрес, а все указанные для этого ДНС имени

Исходное сообщение
"Как в perl выполнить DNS преобразование IP в имя и наоборот." Отправлено Кирилл_Н, 12-Авг-10 13:25
use Net::DNS; my $res = Net::DNS::Resolver->new; my $query = $res->search("www.test.ru"); if ($query) { foreach my $rr ($query->answer) { next unless $rr->type eq "A"; print $rr->address, "\n"; } } Возвращает не один адрес, а все указанные для этого ДНС имени

Ваше сообщение
Имя*:
EMail:	Для отправки ответов на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:
	Введите код, изображенный на картинке:

При общении не допускается: неуважительное отношение к собеседнику, хамство, унизительное обращение, ненормативная лексика, переход на личности, агрессивное поведение, обесценивание собеседника, провоцирование флейма голословными и заведомо ложными заявлениями. Не отвечайте на сообщения, явно нарушающие правила - удаляются не только сами нарушения, но и все ответы на них. Лог модерирования.

Партнёры:

Хостинг:

Закладки на сайте
Проследить за страницей

Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру