Connexion SSH à plusieurs machines
Bonjour,
Je dois finir un petit script d'exploitation qui permet de récupérer les configurations des machines. Je récupère leurs @IP et les stock dans un tableau.
Ensuite je boucle sur ce tableau et je me connecte en SSH sur chacune d'entre elles.
Exemple :
@IPA
@IPB
@IPC
Je me connecte d'abord sur A, tout va bien, je me déconnecte. Maintenant je veux me connecter sur B. Sauf que la connexion échoue et de ce fait, mon programme s'arrete et ne se lance pas sur la machine C.
Avez-vous une idée de comment faire pour que si la connexion échoue, le script continue quand même ?
J'utilise cette fonction de connexion :
Code:
1 2 3 4 5 6
| sub connexionSSH {
($host) = @_;
print "host = ".$host."\n";
$ssh = Net::OpenSSH->new($host, user => $user, password => $password, master_stderr_discard => 1,master_opts => [-o => "StrictHostKeyChecking=no"]);
$ssh->error and die "Erreur lors de la connexion : ".$ssh->error;
} |
Merci d'avance