Uno dei moduli Perl di base che viene fornito con ogni installazione del linguaggio di scripting è il modulo Archive, che comprende una serie di strumenti per lavorare con i file ZIP e altri tipi di archivi. Oltre al formato ZIP onnipresente, la libreria Perl Archive supporta anche TGZ, TAR, GZ, TAR, e altri.

istruzione

1 Creare un nuovo file di testo. Qualsiasi editor di testo semplice farà, a condizione che scrive i file di testo normali e non documenti di elaborazione testi specializzati. Così, per esempio, Blocco note di Windows è accettabile, ma Microsoft Word non è. Nome del file "extractor.pl."

2 Incollare il seguente come prima riga del programma. Si importerà lo strumento achive :: estratto nel programma PERL in modo da poter utilizzare:

utilizzare Archive :: estratto;

3 Incollare il seguente per caricare il file ZIP nella estrattore:

il mio $ estrattore = Archive :: Extract> nuovo (filmati => 'file.zip');

4 Incollare il seguente per estrarre i file nella directory di lavoro corrente (quello lo script è in esecuzione all'interno):

$ Extractor.extract;

In alternativa, se si desidera estrarre i file in una cartella a vostra scelta, incollare il seguente invece:

$ Extractor.extract (a => '/ extractionDirectory /');

Infine, se non si desidera estrarre i file dell'archivio in una directory, ma vuole leggere direttamente nel vostro programma Perl, è possibile incollare il seguente codice invece di generare una serie di file contenuti all'interno:

i miei $ file = $ extractor.files;