|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 06 Jun 2002 12:17:59 To : Eugene Grosbein Subject : Re: gethostbyaddr -------------------------------------------------------------------------------- Здравствуй, Eugene Grosbein. EG> $hostname=`host $ip`; EG> Как можно сделать то же без fork+exec и без Net::DNS? EG> Желательно не ссылку на subj, а хотя бы пару строчек кода. use Socket; my $ip = '208.201.239.56'; my $hostname = gethostbyaddr(inet_aton($ip),AF_INET); print $hostname; -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/144545698ce97.html, оценка из 5, голосов 10
|