|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Konstantin Stupnik 2:5020/400 16 Mar 2001 11:34:41 To : All Subject : Re: netname->ip -------------------------------------------------------------------------------- "Kostya Khandoshko" <root@amurmetal.ru> wrote in message news:98rqn8$1oo7$1@news.gamma.ru... > Как узнать ip адресс машины в локальной сети, зная ее netbios имя. > Если можно то с примером. Именно netbios? Попробуй так: ($name,$aliases,$addrtype,$length,@addrs) = gethostbyname('hostname'); foreach $ip(@addrs) { @ip=unpack("CCCC",$ip); print join('.',@ip),"\n"; } -- Best regards, Konstantin. Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: Talk.Ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6488fc2fd920.html, оценка из 5, голосов 10
|