Tema: Archivos
Pregunta: Como trabajar con un archivo?
Respuesta: Para abrir archivos Perl tiene un manejador de archivos o FileHandle que se utiliza de la siguiente manera:
open (DATABASE, "<archivo.txt");
@registros = <DATABASE>;
close (DATABASE);
De esta forma estamos cargando todas las lineas del archivo en un array, en donde cada linea sea un elemento del array.
Es de notar que antes del nombre del archivo hay un signo de menor, eso significa que el archivo se abrirá para solo lectura, para hacerlo de escritura (borrando previemente la info que tenía) se usa el signo mayor (>) y para solamente agregar info a la que ya contiene el archivo se usan 2 signos mayores (>>), lo que hace es posicionarce en el último caracter del archivo y mediante un "print" podemos agregarle info:
open (DATABASE, ">>archivo.txt");
print DATABASE "Nuevo registro en el archivo\n";
close (DATABASE);