PERL er et tolket skriptspråk populært med mange systemadministratorer for å automatisere jobben sin . Det er kjernen bibliotekene inneholder funksjoner for lett å oppnå mange vanlige databruk , herunder oppretting zip arkivfiler . Instruksjoner
en

Lag en ny tekstfil kalt " zip.perl " ved hjelp av enten Notepad eller en annen redaktør av ditt valg. Sikre at utvidelsen er " perl . " Og ikke
2

Import Zip biblioteket ved å lime inn følgende kommando " txt . ". : En

bruk IO :: Komprimer :: Zip qw ( zip $ ZipError ) ;
3

Angi filene som skal zippet og navnet på zip-filen ved å lime inn følgende kode :

$ innspill = ' . < * > ';

$ output = ' file.zip ';
p Dette vil zip alle filer i gjeldende katalog . Det finnes en rekke alternativer du kan bruke på dette trinnet . For eksempel : en

$ innspill = ' < * txt . > '
P Dette vil zip alle filer i gjeldende katalog som ender med txt filtypen
fire .

Utfør zip drift ved å lime inn følgende kommando : en

zip $ innspill = > $ utgang

eller dø "zip mislyktes" ;
p Hvis du liker , du kan legge til et par valgfrie parametere til dette trinnet . For eksempel, hvis du ønsker å tilføye dataene til slutten av zip -filen i stedet for å lage en helt ny en , bruker du følgende : en

zip $ innspill = > $ utgang, Append = > 1

eller dø "zip mislyktes" ;