Cómo leer archivos CSV en Perl

CSV ( valores separados por comas ) es un formato de archivo especial que se utiliza para transferir datos de hojas de cálculo de una aplicación a otra . Los datos en formato CSV se guardan en un archivo de texto básico con los valores de cada fila separados por comas y cada fila separados por un espacio en blanco. Por lo general, aunque no siempre, la primera línea se utiliza para dar el nombre de las columnas . Por ejemplo , el siguiente texto podría ser parte de una hoja de cálculo CSV para los libros : " Título ", " Autor ", "Romeo y Julieta ", " William Shakespeare ", "Hamlet ", " William Shakespeare " Leer archivos CSV en el lenguaje de programación Perl usando el texto :: biblioteca CSV. Instrucciones
1

Crear un nuevo archivo de texto en un editor de texto. Cualquier editor de texto va a hacer, como el Bloc de notas de Windows , pero el archivo debe terminar con la extensión " . Pl" y no " . Txt" o " . Rtf ".
2

Pega la firma siguiente a la primera línea del archivo de texto . Aunque no es necesario , ayuda si usted distribuye el trabajo a los demás o se olvida de lo que más tarde el lenguaje script está utilizando.

#! /Usr /bin /perl
3

Agregue la siguiente línea al archivo de texto para importar el CSV biblioteca análisis Perl :

uso del texto :: CSV ;
4

analizar e imprimir el contenido de un archivo CSV pegando estas líneas :

my $ entrada = " archivo.csv ' ;

my $ parser = Texto :: CSV - > new ();

abierto ( CSV, "<" , $ entrada ) ;

while ( ) { if ($ parser -> parse ( $ _) ) { mis @ columnas = $ parser -> fields ( ) print " @ columnas \\ n"; } } cerca CSV , .

Reemplazar ' archivo.csv ' con el nombre del archivo CSV para analizar