script avec commande ssh

Marsh Posté le 13-01-2005 à 20:30:09

salut, je voudrais en fait creer un script perl qui me permet de recuperer un fichier sur un pc sur mon reseau et cela de facon securisé.
Pour se faire j'utilise un serveur ssh et la commande scp, mais vu que je ne m'y connais pas trop en perl , je n'y arrive pas.
j'ecris ma commande de cette maniere

$toto = 'ssh -l pseudo@192.168.0.1 pseudo@192.168.0.2 scp /home/../fichier1.txt /home/.../fichier2.txt';

mais ca ne marche pas , quelqu'un pourrait il m'aider.
d'avance merci

Marsh Posté le 13-01-2005 à 20:30:09

Marsh Posté le 13-01-2005 à 20:36:37

ce n'est pas vraiment un pb perl
en perl tu peux faire appel aux commandes systèmes en utilisant le backstick

Code :

$toto = `ls -l /tmp`;

mais ton problème est plus un problème ssh+scp+shell
essayes déjà d'exécuter ta commande dans un shell avant de l'encapsuler dans un perl

Marsh Posté le 13-01-2005 à 23:02:38

scp n'est pas a passer en parametre de ssh. Fait simplement "scp remote_login@remote_host:/remote/path /local/path". Si tu veux faire ca dans un script Perl, tu peux utiliser la fonction system().

Message édité par matafan le 13-01-2005 à 23:03:13

Marsh Posté le 13-01-2005 à 23:19:14

perso moi pr faire quelque chose de propre qui ne pourrit pas mon term et qui permet une gestion d'erreure correct, eval est mon pote:

Code :

eval { system("ls -l /" ); };
if($@) {
print "ba checkance d'erreure!\n";
}

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *