[Cascavel-pm] Problema com Net::Telnet

[vict0r]

Boa tarde,
estou com um problema na utilização do módulo Net::Telnet com um switch de
conteúdo Alteon e gostaria de saber se alguém na lista já passou por isso.
Tenho módulos desenvolvidos para Cisco, Enterasys, Foundry, e todos
utilizando Net::Telnet ou Net::Telnet::Cisco, porém com os CSS Alteon eu
consigo a conexão telnet normalmente, detectando ip, login ou senha errados,
porém não consigo obter o retorno de comandos executados no equipamento pelo
script através do método $obj->cmd ("comando") .
Já testei um comando ping do equipamento para a minha estação e verifiquei
pelo tcpdump da minha máquina que o comando é executado pois recebo o echo
request, portanto o problema é que o output do comando não é retornado pelo
método.
Estou usando código identico para execução de comandos nos equipamentos de
outros fabricantes e as respostas são retornadas normalmente.
Estou colando o código para melhor entendimento.
Agradeço qualquer colaboração.
Victor.

#####################################################################
# Metodo construtor
sub new {

        my ( $self, $ip, $login, $pwd ) = @_;

        my $session = new Net::Telnet ( Timeout=>5, Errmode=>'return',
Prompt=>'/[\$%#>]/');

        my $res = $session->open("$ip");
        if ( ! ( $res ) ) {
                print "Nao foi possivel conectar a $ip\n";
                return -1;
        }

        $res = $session->login($login, $pwd);
        if ( ! ( $res ) ) {
                print "Nao foi possivel autenticar em $ip\n";
                return -2;
        }

        bless $session, "AlteonTelnet";
        return $session;
}

# Metodo comando port
sub who {
        my ( $session ) = @_;
        my @linhas = $session->cmd("who");
        return @linhas;
}
1;
##################################################################
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/cascavel-pm/attachments/20060918/596b1296/attachment.html