Discussion :

[damsdu77]

Salut !

Voila mon problème :

Je fais un telnet sur un equipement pour pouvoir lui passer des commandes.
Jusque la pas de soucis, ensuite mon but et de récupérer le résultat de ces commandes via getline... Hier ca fonctionnait et aujourd'hui, j'ai un read timed-out comme erreur.

Je vous mets le bout du code concerné, je vous passe toutes les declarations de variables et le debut sans interet :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
eval {
    $telnet = new Net::Telnet(  Timeout => $timeout,
                                Prompt => $prompt,
                                Port => $port,
                                Dump_Log => "/home/scripts/log/dump.txt"
                                );
    $telnet->open($ip_equip);
    $telnet->login($user, $passwd);
};
if($@) {
    print "Probleme connexion equipement\n";
    _log("error", "Probleme connexion Telnet");
    die;
}
else {
    print "Connexion OK\n";
    _log("debug", "Connexion OK");
 
    $telnet->print(" ");
 
    $telnet->print("getpop 0\n");
    while($response = $telnet->getline) {
        if($response =~ /(\d).*(GPLT)/ ) {
            print $response;
            push (@cards,"$1");
        }
    }
    sort @cards;
 
    print "Fin du script\n";
    $telnet->close;
    close_log();
}

Merci d'avance à ceux qui m'aideront.

Damien

[Jedai]

Je fais un telnet sur un equipement pour pouvoir lui passer des commandes.
Jusque la pas de soucis, ensuite mon but et de récupérer le résultat de ces commandes via getline... Hier ca fonctionnait et aujourd'hui, j'ai un read timed-out comme erreur.

Si tu n'as rien changé au script et que ça ne marche plus, c'est que le changement provient de l'équipement, essaie de faire les commandes telnet à la main pour voir ce qui se passe par exemple.

--
Jedaï

[damsdu77]

Salut,

Sur l'equipement aucun probleme. Les commandes passent sans soucis...

Je me suis demandé si il y avait une option dans le Net::Telnet pour ignorer le message d'erreur et éviter qu'il "die" mon script mais j'ai pas trouvé.
En plus hier je voyais bien la tempo du timeout mais une fois le temps dépassé il continuait le script sans soucis.

Donc la j'avoue que je ne sais plus ou chercher....



Damien