next up previous contents
suivant: Envoyer un mail avec monter: Perl et le réseau précédent: Comparer des IPs à   Table des matières

Lancer des commandes en SSH

Le module Net::SSH::Perl permet de lancer des commandes sur un serveur distant en utilisant le protocole SSH. Ce module est intégralement écrit en Perl, ce qui permet de gérer la connexion (mot de passe, clef ...) dans le programme lui même.

use Net::SSH::Perl;

my $ssh = Net::SSH::Perl -> new('10.0.0.4');
$ssh -> login('mon_login','mon_password');
my($stdout,$stderr,$exit) = $ssh -> cmd('ls');

print $stdout;

Pour se connecter sur des équipements qui ne supportent pas le protocôle SSH mais uniquement telnet, Perl propose également un module Net::Telnet qui répondra à vos attentes.



2006-03-15