L'Archivio Perl :: modulo Zip può essere utilizzato per creare un archivio Zip all'interno di uno script Perl . Archivi zip vengono utilizzati per comprimere e archiviare più file in un unico file . Questo modulo può anche essere usato per estrarre , o leggere , un file Zip esistente . Una volta che un archivio Zip è creata , i file possono essere aggiunti, rimossi , sostituiti o riorganizzati all'interno di esso. Questo modulo utilizza il formato di file Unix, il che significa che le directory sono separati da una barra (/) , a prescindere dalla convenzione di denominazione del sistema operativo . Istruzioni
1
Aprire una finestra di terminale in Linux o prompt dei comandi in
2
Tipo di Windows il seguente comando per installare il modulo Perl Zip : .
< P > perl- MCPAN -e ' install Archive :: Zip'
3
Aprite un documento di testo vuoto nel vostro editor di testo preferito .
4
Tipo " ! # /bin /perl " senza virgolette per iniziare il vostro script Perl
5
digitare quanto segue per importare il modulo postale: .
uso Archive :: Zip ;
6
digitare quanto segue per avviare una nuova istanza dell'oggetto postale:
$ oggetto = Archive :: Zip- > new ( ) ;
7
Tipo la riga seguente per creare l'array che contiene i nomi dei file di archivio :
@ file = ( ' fileA.txt ', ' fileB.txt ', ' fileC.txt ' ) per < p > Questo utilizza il file fileA.txt , fileB.txt e fileC.txt .
8
Tipo linea " foreach $ file ( @ file) { $ oggetto - > addFile ( $ file ) . ; } "senza virgolette per aggiungere i file all'archivio
9
Tipo le seguenti righe alla creazione di un archivio chiamato test.zip :
if ( $ obj - > writeToFileNamed ( ' test.zip ') ! = AZ_OK ) { print " Archivio non ha creato con successo! " } else {print " Congratulazioni l'archivio è stato creato ! "}
10
Salva il file con l' estensione. pl.
11
prova lo script digitando " perl- w script.pl " senza virgolette al prompt dei comandi .