Discussion :

[Luciefer]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Woufeil]

Salut,

Essaye plutôt d'utiliser les méthodes login pour l'identification et cmd pour le passage de commande, et ça devrais fonctionner

[Luciefer]

Bonjour,

Merci pour les conseils.
J'ai trouvé mon erreur, il a fallu que je définisse mon term

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TERM=vt100, exprt TERM

Lucie