Uno de los módulos PERL núcleo que viene con cada instalación del lenguaje de programación es el módulo Archive, que incluye una serie de herramientas para trabajar con archivos ZIP y otros tipos de archivos. Además del formato ZIP ubicua , la biblioteca Perl Archive también apoya TGZ , TAR , GZ, TAR y otros. Instrucciones
1

Crear un nuevo archivo de texto . Cualquier editor de texto plano va a hacer, siempre y cuando escribe archivos de texto normales y no documentos de procesamiento de textos especializados . Así, por ejemplo , Windows Notepad es aceptable, pero no es Microsoft Word . Nombre del archivo " extractor.pl . "
2

Pega el siguiente como la primera línea del programa . Se importará la herramienta Extract achive :: en el programa Perl para que pueda utilizarlo :

uso Archive :: Extracto ;
3

Pega el siguiente para cargar el ZIP en el extractor :

my $ extractor = archivo :: Extract- > new (archive = > ' file.zip ');
4

Pega el siguiente extraer los archivos en el directorio de trabajo actual (el que se ejecuta el script dentro ) :

$ extractor.extract ;

Alternativamente , si desea extraer los archivos en un directorio de su elección , pegue el siguiente lugar :

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

Por último , si usted no desea extraer los archivos en el archivo comprimido a una directorio, pero quiero leer directamente en su programa de Perl , puede pegar el siguiente código en lugar de generar una matriz de los archivos contenidos en :

mis $ files = $ extractor.files ;
< br >