July 27
Il modulo :: Zip Perl Archive può essere utilizzato per creare un archivio Zip all'interno di uno script Perl. archivi zip sono 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 creato un archivio Zip, 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.
1 Aprire una finestra di terminale in Linux o dal prompt dei comandi di Windows.
2 Digitare il seguente comando per installare il modulo Perl postale:
perl -MCPAN -e 'installare Archive :: Zip'
3 Aprire un documento di testo vuoto nel vostro editor di testo preferito.
4 Tipo "#! / Bin / perl" senza virgolette per avviare lo script Perl.
5 Digitare quanto segue per importare il modulo postale:
utilizzare Archive :: Zip;
6 Digitare quanto segue per iniziare una nuova istanza dell'oggetto postale:
$ Oggetto = Archive :: Zip-> new ();
7 Digitare la seguente riga per creare l'array che contiene i nomi dei file da memorizzare:
@file = ( 'fileA.txt', 'fileB.txt', 'fileC.txt')
Questo utilizza i file fileA.txt, fileB.txt e fileC.txt.
8 Digitare la riga "foreach $ file (@file) {$ object-> addfile ($ file);}" senza virgolette per aggiungere i file all'archivio.
9 Digitare le righe seguenti per creare l'archivio chiamato test.zip:
if ($ obj-> writeToFileNamed ( 'test.zip')! = AZ_OK) {print "Archivio non creato con successo!" } Else {print "Complimenti l'archivio è stato creato!" }
10 Salvare il file con l'estensione del file .pl.
11 Testare lo script digitando "perl -w script.pl" senza virgolette al prompt dei comandi.