CSV ( valores separados por comas ) archivos contienen texto o campos numéricos que están separados por comas. Es un formato de archivo común utilizado para el intercambio de datos entre los programas de hojas de cálculo como Microsoft Excel o Microsoft Works , y aplicaciones de usuario . Los valores de texto en archivos CSV están rodeados de caracteres de doble cotización. El lenguaje Perl le proporciona la "Text :: CSV" del módulo para analizar los datos CSV , que le da la capacidad de realizar el desglose correcto de un archivo CSV en su programa Perl , si los campos de texto en el archivo incluyen comas. La forma más fácil de mostrar este proceso es el uso de un ejemplo , como una lista de los estados y capitales. Cosas que necesitará
ActiveState Perl versión 5.12 para Win32
Ver Más instrucciones
1
clic en "Inicio " de Windows , seleccione " Microsoft Works " y haga clic en " Microsoft . Obras de hoja de cálculo "
2
Introduzca los siguientes datos en las primeras 11 filas de la columna" A " :
Estado ( capital)
Alabama
California, Sacramento
Delaware
Florida
Georgia, Atlanta area
Hawaii
Idaho
Kansas
Maine
Ohio, Columbus
3
Introduzca los siguientes datos en las primeras 11 filas de la "B " Página 4
Haga clic en " Archivo" y luego haga clic en "Guardar como ". Escriba " states.csv " en el cuadro "Nombre de archivo " . Elija la opción " Texto y comas ( . Csv ) " desde la opción "Guardar como tipo " y haga clic en el botón " Guardar" .
5
clic en "Inicio " de Windows y haga clic en " Bloc de notas " para abrir . editor de texto Bloc de notas
6
Agregue el código siguiente en la ventana abierta :
use strict ;
advertencias uso
;
uso del texto :: CSV_XS ;
archivo # abierto para analizar
my $ archivo = ' c: \\ states.csv ' ;
# define el campo de texto variable
< p> my $ csv = Texto :: CSV_XS - > new ();
abierto ( CSV , "<" , $ file ) or die $ ; !
# descomponer el archivo en registros de texto
while ( ) {
next if ( $ 1 == . ) ;
if ($ csv- > parse ( $ _ )) {
mis @ columnas = $ csv -> fields ();
# mostrarse cada registro en una línea
print Estado independiente " ( capital) : $ columnas [ 0 ] \\ n \\ Trank :
$ columnas [ 1 ] \\ r \\ n ";
} else {
mi $ err = $ csv- > ; error_input ;
print " No se ha podido analizar la línea : $ err " ;
}
}
cerca CSV ;
7
Haga clic en " archivo" y luego haga clic en " Guardar". Escriba " parse.pl " en el cuadro "Nombre de archivo " y haga clic en el botón "Guardar " .
8
clic en "Inicio " de Windows y haga clic en " Ejecutar". Escriba " cmd " en el cuadro "Abrir" y haga clic en " Aceptar" para abrir la ventana de línea de comandos.
9
Escriba " cd \\ " y pulse la tecla "Enter" .
10
Escriba " perl parse.pl " en el indicador. Pulse la tecla "Enter" para ejecutar el script de Perl " parse " para analizar los "estados " archivo CSV y mostrar sus campos de texto en la pantalla.