Les Archives Perl :: module Zip peut être utilisé pour créer une archive Zip à partir d'un script Perl . Archives Zip sont utilisés pour compresser et de stocker plusieurs fichiers dans un seul fichier . Ce module peut également être utilisé pour extraire ou lire un fichier Zip existant . Une fois une archive ZIP est créé, les fichiers peuvent être ajoutés, supprimés , remplacés ou réorganisés en son sein. Ce module utilise le format de fichier Unix, ce qui signifie que les répertoires sont séparés par une barre oblique ( /) , indépendamment de la convention de nommage du système d'exploitation. Instructions
1

Ouvrez une fenêtre de terminal sous Linux ou la commande suivante pour installer le module Perl Zip invite de commande de Windows
2

Type:
< p. > perl- MCPAN -e 'install Archive :: Zip
3

Ouvrez un document texte vide dans votre éditeur de texte préféré .
4 Type de

" ! # /bin /perl "sans les guillemets pour commencer votre script Perl
5

Tapez la suivante pour importer le module postal: .

utilisation Archive :: Zip ;

6

Tapez la commande suivante pour démarrer une nouvelle instance de l'objet postal:

$ objet = Archive :: Zip- > new ( ) ;
7 Type de

la ligne suivante pour créer le tableau qui contient les noms des fichiers à stocker:

@ files = (' fichierA.txt ', ' fileB.txt ', ' fileC.txt ')
< p > Celui-ci utilise le fichier fichierA.txt , fileB.txt et fileC.txt .
8

tapez la ligne " foreach $ file ( @ fichiers) { $ object -> addFile ($ file ) . ;} "sans les guillemets pour ajouter les fichiers de l'archive
9 Type de

les lignes suivantes pour créer l'archive appelés test.zip :

if ($ obj- > writeToFileNamed (' test.zip ') ! = AZ_OK ) {print " Archive pas créé avec succès ! " } else {print " Félicitations les archives a été créé! "}
10

Enregistrer le fichier avec l'extension de fichier . pl.
11

tester le script en tapant " perl -w script.pl " sans les guillemets à l'invite de commande .