Discussion :

[Bruno51]

Bonjour

je suis tout nouveau dans le monde perl et je suis en train d'apprendre.
Rien de mieux pour apprendre que de mettre en pratique. Le problème, c'est que je rencontre déjà un obstacle en voulant écrire en perl un fichier dos qui fait simplement un move de fichier entre 2 serveurs:

code dos: rename *.fic \\serveur2\dir_cible

J'ai essayé avec le module File::Copy et la syntaxe suivante:

use strict;
use warnings;
use File::Copy;
my $fichier1 = "fichier.txt";
my $fichier2 = '\\serveur2\dir_cible\fichier.txt';
copy($fichier1,$fichier2);

Mais cela ne semble pas vouloir fonctionner ... J'ai cherché (si si !) mais je ne trouve rien se rapportant à moin besoin (à part du ftp, ce que je surtout éviter).

Si quelqu'un pouvait m'aider, ce serait super cool !!

Merci d'avance.

Bruno

[djibril]

ton probleme vien des chemins :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my $fichier2 = '\\serveur2\dir_cible\fichier.txt';

\ est un caractere d'echappement.
soit tu ecris :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my $fichier2 = '\\\\serveur2\\dir_cible\\fichier.txt';

soit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

my $fichier2 = 'A:/serveur2/dir_cible/fichier.txt';

A la place de \\ tu dois surement pouvoir mettre la lettre du lecteur reseau. Faut voir dans ton favoris reseau ou poste de travail.

[Bruno51]

Merci bcp.
Effectivement, j'ai doublé tous les '\' et maintenant ça fonctionne.

Concernant l'appellation par la lettre du lecteur, je ne peux pas utiliser cette méthode car le lecteur réseau n'est pas monté en permanence.

Encore merci et vive le Perl