Discussion :

[Cyspak]

Salut,


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

Code :

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

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 :

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

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

[nyal]

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

[Cyspak]

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

En tout cas merci pour ton aide...