I need to know a more specific terminal than unknown
Bonjour,
Je travaille sur un programme PERL qui envoie des commandes sur un terminal windows par l'intermédiaire d'un telnet.
Mon code ressemble un peu à celà :
Code:
1
2
3
4
5
6
|
my $t=new Net::Telnet or die "can't connect:$!";
$t->open($HOST);
$t->print($username); #Je m'identifie
$t->print($password);
$t->print("$ma_commande"); |
Et quand je réceptionne le résultat de ma commande, j'ai le message d'erreur :
I need to kwnow a more specific terminal than unknow.
Je ne comprend pas. J'ai un autre programme qui utilise cette méthode et tout fonctionne très bien mais là...
Quand manuellement je teste, je lance une commande telnet, je m'identifie et je lance ma commande, j'obtiens un écran, sans le message d'erreur. Quand je passe par ma programme, il y a un message d'erreur.
Vous avez une idée?
Merci,
Lucie
