Discussion :

[djibril]

Une question bete, comment faire une copy d'un fichier en Perl (sous windows).
Sous linux, on on peut faire :
cp toto.pst /home/titi/saivegarde.pst
Ce qui fait une copie du fichier toto.pst dans un autre repertoire. J'ai essayé rename, mais ça me deplace le fichier (comme mv sous linux).
Merci!

[Jedai]

Utilises File::Copy, c'est un module du Core, donc il est disponible partout.

--
Jedaï

[djibril]

c'est vrai, j'avais oublié l'existence de ce module, merci jedai.
Ca fonctionne bien.
voici un exemple de ce que je fais pour ceux que ça interesse, ainsi, c'est portable sur windows et linux :

Code :

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

1
2
3
4
5
6
7
8
#!/usr/bin/perl -w
use strict;
use Carp;
use File:Copy;
 
copy("toto.txt","../toto_copy.txt");
copy("toto.xls" ,"../toto_copy.xls");
copy("toto.exe","../toto_copy.exe");