[Cascavel-pm] Net::Telnet

[Marco A P D´Andrade]

Adriano,

Eu utilizei um script similar ao seu para efetuar um teste e meu unico 
problema foi o timeout.

Para depurar aconselho verificar as opções de log e dump no manual.  
Outra coisa a corrigir é seu parametro de Prompt, pois vc nao necessita 
de escape para a formacao usada (aspas simples).

Sds,
Marco Antonio

vivan em dim.fm.usp.br wrote:

>Oi,
>
>Alguem pode me dar um help no modulo Net::Telnet? Estou tentando
>utiliza-lo para acessar um router, mas sem sucesso... Onde estou errando?
>
>#!/usr/bin/perl
>use Net::Telnet ();
>
>########## LOGIN E SENHA ##############
>$login="burps";
>$password="bleargh";
>#######################################
>
>$t = new Net::Telnet (Timeout => 10,
>                      Prompt => '/rtb0101\>/');
>$t->open("10.22.4.15");
>
>$t->login($login, $passwd);
>@lines = $t->cmd("sh conf");
>print @lines;
>
>
>Tks,
>Adriano.
>
>--------------------------
>Esta mensagem foi verificada
>pelo sistema de antivírus DIM e
>acredita-se estar livre de Virus.
>Virus data file v4356 created May 02 2004
>
>_______________________________________________
>Cascavel-pm mailing list
>Cascavel-pm em mail.pm.org
>http://cascavel.pm.org/mailman/listinfo/cascavel-pm
>
>
>  
>