Einer der wichtigsten Perl-Module , die mit jeder Installation der Skriptsprache kommt, ist die Archiv -Modul, das eine Reihe von Tools für die Arbeit mit ZIP -Dateien und andere Arten von Archiven beinhaltet . Neben dem allgegenwärtigen ZIP-Format , das Perl Archive Bibliothek unterstützt auch TGZ , TAR, GZ , TAR, und andere. Anleitung
1

Erstellen Sie eine neue Textdatei . Jede Texteditor tun wird, vorausgesetzt, es schreibt gewöhnliche Textdateien und nicht spezialisierte Textverarbeitung Dokumente. So ist zum Beispiel Windows Notepad akzeptabel, aber Microsoft Word ist es nicht. Benennen Sie die Datei " extractor.pl . "
2

Fügen Sie den folgenden als erste Zeile Ihres Programms. Es wird die Achive :: Extract Werkzeug in die PERL Programm zu importieren , so dass Sie sie verwenden können :

Verwendung Archive :: Extract ;
3

Fügen Sie den folgenden an der Last ZIP-Datei in den Extraktor :

my $ Dunstabzug = Archive :: Extract -> new (Archiv => ' file.zip ');
4

Paste folgendes zu entpacken Sie die Dateien in das aktuelle Verzeichnis (der das Skript innerhalb läuft ):

$ extractor.extract ;

Alternativ, wenn Sie wollen , um die Dateien in ein Verzeichnis Ihrer Wahl entpacken , fügen Sie den folgenden statt :

$ extractor.extract ( to = > ' /extractionDirectory /');

Schließlich, wenn Sie nicht möchten, dass die Dateien im Archiv zu extrahieren, um eine Verzeichnis , aber wollen sie direkt lesen in Ihrem Perl-Programm , können Sie stattdessen den folgenden Code einfügen, um ein Array der darin enthaltenen Dateien zu erzeugen:

my $ files = $ extractor.files ;
< br >