Les Allergies
Alimentaires
Posez votre question Signaler

Perl & Telnet [Résolu]

vindicien 124Messages postés 6 mars 2009Date d'inscription 22 février 2011Dernière intervention - Dernière réponse le 18 janv. 2010 à 09:40
Bonjour à tous,
Je rédige actuellement un script en Perl qui permettra de me connecter à un switch en Telnet.
La connexion se passe très bien.
$t = new Net::Telnet (Timeout => 3000,ErrMode => 'return', Prompt => $prompt);
$t->open(Host=>$server);
j'essaie ensuite de passer cette commande
@lines = $t->cmd(String =>"ippstat list all");
Le problème est que je n'arrive pas à récupérer la totalité du résutat...
En gros @lines va contenir uniquement 500 lignes au lieu des 4000 qui sont renvoyées si je tape cette commande en dehors du script...
Quelqu'un saurait-il pourquoi ?
Est-ce une question de buffer ? Et si oui comment y remédier ?
Me bible actuelle est celle la, si vous en connaissez d'autres...
Merci d'avance,
Vindicien
Lire la suite 

Perl & Telnet »

5 réponses
Réponse
+0
moins plus
hello
si c'est un Cisco, pour qu'IOS n'arrête pas l'affichage en "fin d'écran", il faut entrer
set term length 0
essaye, peut-être que ...
Ajouter un commentaire
Réponse
+0
moins plus
Salut salut !!

Merci de venir à ma rescousse !! Malheureusement c'est pas du Cisco c'est de l'Alcatel... Mais je vais creuser dans ce sens, en effet c'est possible que la problème vienne de là !!
Ce qui est bizarre c'est que la commande déconne uniquement dans le script...

Enfin merci pour cette piste dubcek !!!

Bonne journée
Ajouter un commentaire
Réponse
+0
moins plus
Je n'arrive toujours pas à solutionner ce problème...
D'autres idées messieurs dames ?
Ajouter un commentaire
Réponse
+0
moins plus
augmenter la taille du buffer ?
max_buffer_length - maximum size of input buffer
$len = $obj->max_buffer_length;
$prev = $obj->max_buffer_length($len);
This method designates the maximum size of the input buffer.
Ajouter un commentaire
Réponse
+0
moins plus
Merci pour ton aide dubcek !

Au final j'ai préféré utiliser un script en shell avec des expect. Il m'a fallu quelques minutes pour réaliser le script dont j'avais besoin. Je vais en rester la puis je reviendrai sur ce problème en Perl dès que j'ai un peu de temps à perdre.

J'en profiterai pour tester ta méthode pour la taille du buffer et te donnerai des nouvelles !

Bonne journée,

Vind'
Ajouter un commentaire
Ce document intitulé « Perl & Telnet » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?