Re: [inet-admins] Прога на PERL'е

["Andy Igoshin" <ai@vsu.ru>]

On Tue, 16 Jan 2001 13:25:00 +0300
 Sergey A Nasedkin <s.nasedkin@tz.ru> wrote:
> Hello All,
> 
> Народ, проблема:
>  есть железка к которой логинишься стандартным
> телнетом.  Для старта login'a нужно отправлять "S"
> пока не получишь его обратно.
> Потом появляется нормальный "login:" и "password:".
> При работе "руками" все нормально. А с прогой беда.
> Но все дело в том, что login не появляется.
> Посмотрел tcpdump'ом в чем разница.
> А разница между "ручным" методом и прогой в следующем:
> "ручной" - посылается пакеты с 1 "S"
> прога    - посылает 1 пакет из "SSSSSS" и все.
> 
> 
> Как в перле сделать, чтобы каждая "S" отправлялась своим пакетом ?
> 
> 
> Кусок проги:
> ---------------

$|=1;


> $t=new Net::Telnet (Timeout => 10,
>                 Prompt => '/\$ $/',
>                 Dump_Log=>$filename);
> 
> 
> $t->open("md");
> 
> $t->print('S');
> $nume = $t->print_length;
> $t->print('S');
> $nume = $t->print_length;
> $t->print('S');
> 
> $t->get;  
> 
> -----------------
> 
> 
> 
> 
> Best regards,
>  Sergey A Nasedkin                          mailto:s.nasedkin@tz.ru
> 
> 
> 
> =============================================================================
> "inet-admins" Internet access mailing list. Maintained by East Connection
> ISP.
> Mail "unsubscribe inet-admins" to Majordomo@info.east.ru if you want to
> quit.
> Archive is accessible on http://info.east.ru/rus/inetadm.html

-- 
Andy Igoshin <ai@vsu.ru>                 Voronezh State University
Phone: +7 (0732) 522406                  Network Operation Center
Fax:   +7 (0732) 789820                  Voronezh, Russia

=============================================================================
"inet-admins" Internet access mailing list. Maintained by East Connection ISP.
Mail "unsubscribe inet-admins" to Majordomo@info.east.ru if you want to quit.
Archive is accessible on http://info.east.ru/rus/inetadm.html