Discussion :

[darude94]

Bonjour à tous,


Voila la problématique, j'ai besoin au travers d'une connexion SSH d'exécuter du code Perl sur une machine distante.

Tout doit se faire dans le même script. La connexion SSH se fait via le module Net::SSH:: Perl de cette façon :

my $ssh = Net::SSH:: Perl->new($host);
$ssh->login($user, $pass);
my($stdout, $stderr, $exit) = $ssh->cmd("commande");

Sauf qu'au lieu d'envoyer une commande system j'ai besoin d'exécuter du code Perl. En l'occurrence je dois calculer sur la machine distante les clés MD5 de certains fichiers pour les stocker dans un tableau (que j'exploite ensuite dans mon script sur la machine hôte bien entendu). Pas de soucis pour ce code, sauf que pour l'exécuter sur la machine distante je ne sais pas comment faire...


Merci d'avance pour votre aide.

[djibril]

http://perl.developpez.com/sources/?...on2#SSHWindows

[darude94]

Ca ne convient pas, ça revient à faire la même chose que ce que je fais deja.

Je ne cherche pas à exécuter une commande system via du perl sur une machine distante, je cherche à exécuter du code perl sur une machine distante.

[djibril]

Dans tous les cas, tu devras lancer via la commande system sur le serveur distant un code perl, donc ça revient à la même chose.
ssh => lancement script perl sur serveur distant : perl toto.pl