Bonjour,

Dans le cadre d'un stage je dois faire un programme qui permet de lancer des commandes à distances sur des commutateurs via un script PERL. J'ai chercher à droite à gauche et j'ai trouvé des solutions qui ne correspondent pas exactement à ce que je veux faire. Par exemple je suis tomber sur un script qui me permet de lancer des commandes misent les unes à la suite des autres dans un fichier ou encore un script permetant d'envoyer des commandes prédéfinis dans le programme.
ex:
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
 
use strict; 
 use Net::Telnet; 
 use CGI qw/:standard :html3 :netscape escape unescape/; 
 use CGI::Carp qw/fatalsToBrowser/; 
 
 my $username="login; 
 my $passwd="password"; 
 my $HOST="toto.fr"; 
 print header; 
 my $t = new Net::Telnet (Timeout=>undef) or die "Can't connect:$!"; 
 $t->open($HOST);
 $t->login($username, $passwd); 
 my @lines = $t->cmd("/ma/commande/a/executer");
 print join(' ',@lines);
J'aurais donc voulu savoir si c'était possible de faire un script qui me lance un prompt apres lui avoir saisi l' @IP le login et le password du matériel.
Si vous avez des élements de réponse ou meme des liens pouvant me mettre sur une piste n' hésiter pas.

Exposé comme cela vous pensez surement que ca n'a aucun intéret car autant faire directement un telnet mais c'est pour l'intégrer dans un gros script.

Cordialement.