|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artem Chuprina 2:5020/400 15 Jan 2003 14:43:34 To : "Sergey Larionov" Subject : Re: Полное номенное имя моего компа -------------------------------------------------------------------------------- Здравствуй, Sergey Larionov. SL> Как определить полное доменное имя на win NT / 2K ? SL> Кристиансен, в "Библиотеке программиста" рекомендует так : SL> use strict; SL> use Sys::Hostname; SL> use Socket; SL> my $hostname = hostname(); SL> my $Address = gethostbyname($hostname) SL> or die "Couldn't resolve $hostname; $!"; SL> my $DNSname = gethostbyaddr($Address, AF_INET) SL> or die "Couldn't re-resolve $Address; $!"; SL> my $ip = inet_ntoa($Address); SL> print "Address : $ip Name : $DNSname"; SL> Рецепт 17.8 SL> Hо не работает это !!!! После выполнения печатается : SL> Address : 123.45.67.89 Name : lary SL> А я хочу получить SL> Address : 123.45.67.89 Name : lary.darim.ru SL> В чем проблема ? В принципе может быть в кривой настройке DNS или прочих мест, где указано имя (типа ETC/HOSTS или где его сейчас можно в винде указать) - первое обнаруженное имя оказывается не FQDN. Попробуй сходить к DNS'у непосредственно. Впрочем, тут тот еще вопрос - где взять адрес DNS... -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/1445489acc34e.html, оценка из 5, голосов 10
|