Archive::Zip

Salut,


J'utilise la librairie Archive::Zip pour faire un backup de fichier assez volumineux. J'arrive bien à zipper un fichier :

Code:

---

1 2 3 4 5

use Archive::Zip qw( :ERROR_CODES :CONSTANTS );   my $zip = Archive::Zip->new(); $member = $zip->addFile('test.pl'); die 'write error' if $zip->writeToFileNamed( 'test.zip' ) != AZ_OK;

---

Mais je n'arrive pas à zipper un dossier :

Code:

---

1 2 3 4 5 6

use Archive::Zip qw( :ERROR_CODES :CONSTANTS );   my $zip = Archive::Zip->new();   my $member = $zip->addDirectory('d:\\test\\test\\'); die 'write error' if $zip->writeToFileNamed( 'test.zip' ) != AZ_OK;

---

Si qqun aurait une idée.
Merci d'avance...

PS : je développe sous win2k

Bonjour,

Je pense que cette page possede la reponse (je l'ai lu) :
http://search.cpan.org/author/NEDKONZ/Archive-Zip-1.06/lib/Archive/Zip/FAQ.pod

:P

Je suis tombé exactement sur cette page il y a 10 minutes, et j'y ai trouvé ma réponse.
Comme quoi, les grands esprits se rencontrent :wink:

En tout cas merci pour ton aide...