Die Perl Archive :: Zip Modul kann verwendet werden, um ein Zip-Archiv aus einem Perl-Skript erstellt werden. Zip-Archive werden zum Komprimieren und Speichern mehrerer Dateien in einer einzigen Datei. Dieses Modul kann auch verwendet werden, zu extrahieren oder zu lesen, eine vorhandene ZIP-Datei werden. Sobald ein Zip-Archiv erstellt wurde, können Dateien hinzugefügt, entfernt , ersetzt oder neu in ihm . Dieses Modul verwendet die Unix -Datei-Format , welche Verzeichnisse durch einen Schrägstrich (/) getrennt sind, unabhängig von der Betriebssystem Namenskonvention bedeutet . Anleitung
1

Öffnen Sie ein Terminal-Fenster in Linux oder die Eingabeaufforderung in Windows
2

Geben Sie den folgenden Befehl, um die Perl Zip -Modul installieren: .
< P > perl- MCPAN -e 'install Archive :: Zip '
3

Öffnen Sie ein leeres Textdokument in Ihrem bevorzugten Text- Editor.
4

Type " ! # /bin /perl "ohne Anführungszeichen zu beginnen Ihre Perl-Skript
5

Geben Sie den folgenden , um die Zip -Modul importieren .

Verwendung Archive :: Zip ;

6

Geben Sie den folgenden , um eine neue Instanz der Zip -Objekt starten:

$ object = Archive :: Zip -> new ();
7

Typ die folgende Zeile , um das Array , das die Namen der Dateien hält an Speicher zu erstellen :

@ files = ( ' DateiA.txt ', ' fileB.txt ', ' fileC.txt ')
< p > Diese verwendet die Dateien DateiA.txt , fileB.txt und fileC.txt .
8

Geben Sie die Zeile " foreach $ file ( @ files) { $ object -> addFile ( $ file ) . ;} "ohne Anführungszeichen , um die Dateien in das Archiv hinzufügen
9

Geben Sie die folgenden Zeilen , um das Archiv zu erstellen genannt test.zip :

if ($ obj-> writeToFileNamed ( ' test.zip ') ! = AZ_OK ) {print " Archive nicht erfolgreich ! erstellt " } else {print " Herzlichen Glückwunsch das Archiv wurde erstellt! "}
10

Speichern die Datei mit der . pl Dateiendung.
11

Testen Sie das Skript , indem Sie " perl -w script.pl " ohne Anführungszeichen in der Eingabeaufforderung .