Et af de centrale Perlmoduler der følger med hvert installation af scriptsprog er Archive -modul, som omfatter en række værktøjer til at arbejde med ZIP-filer og andre typer af arkiver. Udover den allestedsnærværende ZIP-format , også Perl Archive biblioteket understøtter TGZ , TAR , GZ , tjære og andre. Instruktioner
1
Opret en ny tekstfil. Enhver almindelig tekst editor vil gøre, hvis det skriver almindelige tekstfiler og ikke specialiserede tekstbehandling dokumenter. Så for eksempel, er Windows Notesblok acceptabel, men Microsoft Word er det ikke. Navngiv filen " extractor.pl ".
2
Indsæt følgende som den første linje af dit program . Det vil importere Opnå :: Extract værktøjet ind i PERL program, så du kan bruge det : Hej
brug Archive :: Extract ,
3
Indsæt følgende for at indlæse ZIP-fil ind i emhætte : Hej
min $ emhætte = Archive :: Extract- > nye ( archive => ' file.zip ');
4
indsæt følgende for at udpakke filerne til den aktuelle arbejdsmappe ( den ene scriptet kører indenfor) : Hej
$ extractor.extract ,
Alternativt, hvis du ønsker at udpakke filerne til en mappe efter eget valg , indsæt følgende i stedet : Hej
$ extractor.extract ( til = > ' /extractionDirectory /');
Endelig, hvis du ikke ønsker at udpakke filerne i arkivet til en bibliotek , men ønsker at læse dem direkte i din PERL program, kan du indsætte følgende kode i stedet for at generere en række af de filer , der er indeholdt i : Hej
min $ filer = $ extractor.files ,
< br >