|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alex Gain 2:5020/400 14 Sep 2000 08:26:22 To : All Subject : Net:Telnet -------------------------------------------------------------------------------- Привет, кто знает почему скрипт вываливается по timeout? Прямо из книги: use Net::Telnet (); $passwd = "что-то"; $username = "чей-то"; $domen = "199.99.9.9"; #Понятно условный $t = new Net::Telnet (Timeout => 30, Prompt => '/ksh\$ $/'); $t->open($domen); $t->login($username, $passwd); @lines = $t->cmd("/usr/bin/who"); print @lines; $host->close; Может кто встречался с этим? Alex. --- ifmail v.2.15dev5 * Origin: VSV (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/65779577e6e1.html, оценка из 5, голосов 10
|