ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Pavel Letskiy                        2:5020/400     10 Jul 2003  17:50:25
 To : All
 Subject : telnet
 -------------------------------------------------------------------------------- 
 

 Да прибудет с нами Великая Сила!
 
 Есть следующий скрипт: 
 
 $t = Net::Telnet->new( Timeout => 10,
                        Prompt  => '/CVX-SPB\> $/',
                        Host    => $host,
                        Dump_Log => $dumplog,
                        Input_Log => $inputlog );
 
 $t->login($username, $password )
 
         or die "Login failed: @{[ $t->errmsg() ]}\n";
 @stat = $t->cmd("vinfo");
 
 print @stat;
 
 $t->close;
 
 ОТрабатывает нормально до строки ввода команды. Hа ней застревает, а потом
 отваливается по тайм-ауту.
 
 В логах имеем следующие записи:
 
 input log:
 Nortel Networks CVX-1800
 CVX1-SPB
 
 login: login
 password: 
 CVX1-SPB> 
 
 Т.е. строку приглашения получили...
 
 В общем в чем проблема не понятно... Ткните плиз куда смотреть.
 Заранее спасибо.
 
 --
 Павел "Che" Лецкий
 =======================
 Registered Linux User #305735
 FIDOnet 2:5030/1505.2
 mailto: che@deepapple.com
 
 --- ifmail v.2.15dev5
  * Origin: Sovintel (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    telnet   Pavel Letskiy   10 Jul 2003 17:50:25   Re: telnet   wwk@kyivstar.net   22 Jul 2003 16:03:36   Re: telnet   Pavel Letskiy   24 Jul 2003 14:38:08   Re: telnet   wwk@kyivstar.net   24 Jul 2003 17:44:07