Modification de Cisco : Script de sauvegarde automatique des configurations des switch
La modification peut être annulée. Veuillez vérifier les différences ci-dessous pour voir si c’est bien ce que vous voulez faire, puis publier ces changements pour finaliser l’annulation de cette modification.
Version actuelle | Votre texte | ||
Ligne 77 : | Ligne 77 : | ||
use Net::SSH::Perl; | use Net::SSH::Perl; | ||
use POSIX qw(strftime); | use POSIX qw(strftime); | ||
use Sys::Syslog qw(:DEFAULT setlogsock); | use Sys::Syslog qw( :DEFAULT setlogsock); | ||
# Variables à configurer | # Variables à configurer | ||
my $user = "admin"; # Nom d'utilisateur | my $user = "admin"; #Nom d'utilisateur | ||
my $pass = ""; # Mot de passe | my $pass = ""; #Mot de passe | ||
my $server = ""; # Serveur TFTP | my $server = ""; #Serveur TFTP | ||
my @hosts = ("switch1","switch2"); # Liste des switch | my @hosts = ("switch1","switch2"); #Liste des switch | ||