1
Abra una ventana de terminal en Linux o el símbolo del sistema en Windows
2
Escriba el siguiente comando para instalar el módulo Perl Zip : .
< P > perl- MCPAN -e ' install Archive :: Zip'
3
Abra un documento de texto en blanco en su editor de texto preferido .
4
Type " ! # /bin /perl "sin las comillas para comenzar la secuencia de comandos Perl
5
Escriba lo siguiente para importar el módulo Zip : .
Archive :: Zip uso ;
6
Escriba el siguiente para iniciar una nueva instancia del objeto postal:
$ objeto = Archive :: Zip- > new ();
7
Tipo la siguiente línea para crear la matriz que contiene los nombres de los archivos a almacenar:
@ files = ( ' fileA.txt ', ' fileB.txt ', ' fileC.txt ' )
< p > Se utiliza el archivos fileA.txt , fileB.txt y fileC.txt .
8
Escriba la línea " foreach $ archivo ( @ archivos) { $ object -> addFile ( $ file ) . ;} "sin las comillas para agregar los archivos al archivo
9
escriba las líneas siguientes para crear el archivo llamado test.zip :
if ($ obj- > writeToFileNamed ( ' test.zip ' ) ! = AZ_OK ) {print "El archivo no se creó con éxito ! "} else { print " Felicidades , el archivo ha sido creado! "}
10
Guardar el archivo con la extensión de archivo . pl.
11
probar el script escribiendo " perl- w script.pl " sin las comillas en el símbolo del sistema .