Je cherche en ce moment à telecharger les fichiers de configuration d'un routeur cisco par le biais d'un script perl et d'un serveur tftp.
Le pc et le routeur sont reliés en Ethernet.
Voici mon script actuellement (je découvre perl...)
#!/usr/bin/perl
use Net::Telnet;
# IP du routeur
$ip = '192.168.0.252';
$telnet = new Net::Telnet (Output_log => 'log',Timeout=>10,Errmode=>'return',Binmode=>'true',Telnetmode=>1,Cmd_remove_mode => 1, Host => $ip);
# IP de l'hote TFTP
$iphote = '192.168.0.38';
print "\nConnect to $ip...\n";
if (defined ($telnet))
{
$telnet->print('en');
# récupération de la configuration de base
$telnet->print('copy flash:config.text tftp://$iphote');
# récupération de la VLAN Database
$telnet->print('copy flash:vlan.dat tftp://$iphote/vlan.dat');
}
Le script ne fonctionne pas.. est ce que quelqu'un saurait me guider ?
Merci d'avance !
