Programação  
 
Conhecimento computador >> Programação >> Programação Perl >> 
Como analisar CSV em Perl
arquivos (valores separados por vírgula ) CSV contêm texto ou campos numéricos que são separadas por vírgulas. É um formato de arquivo comum usado para troca de dados entre programas de planilhas , como o Microsoft Excel ou Microsoft Works , e aplicativos do usuário. Os valores de texto em arquivos CSV são cercados por caracteres de aspas duplas . A linguagem Perl fornece-lhe com o módulo " Text :: CSV" para analisar dados CSV , que lhe dá a capacidade de realizar a repartição correta de um arquivo CSV em seu programa Perl, se os campos de texto no arquivo de inclusão vírgulas. A maneira mais fácil de mostrar esse processo é a utilização de um exemplo , como uma lista de estados e capitais . Coisas que você precisa
ActiveState Perl versão 5.12 para Win32
Mostrar Mais instruções
1

Clique em " Iniciar" do Windows , selecione "Microsoft Works" e clique em "Microsoft Planilha do Works "
2

Digite os seguintes dados nas primeiras 11 linhas da coluna" a ": .

Estado (Capital)

Alabama

Califórnia , Sacramento

Delaware

Florida

Georgia , Atlanta

Havaí

Idaho

Kansas

Maine

Ohio, Columbus
3

Digite os seguintes dados nas primeiras 11 linhas da "B"
4

Clique em "Arquivo " e clique em " Salvar como". Enter " states.csv " na caixa " Nome do arquivo " . Escolha a opção de " Texto e vírgulas ( . Csv) " o "Salvar como tipo " caixa e clique no botão "Salvar" .
5

Clique em " Iniciar" do Windows e clique em "Notepad " para abrir o editor de texto Notepad
6

Adicione o seguinte código na janela aberta : .

use strict;

usar advertências ;

usar texto :: CSV_XS ;

# abre o arquivo para análise

my $ file = 'c: \\ states.csv ';

# define a variável de campo de texto

my $ csv = Text :: CSV_XS -> new ();

aberta ( CSV, "<", $ file ) or die $ ;

# quebrar a arquivo em registros de texto

while ( ) {

próxima if ($ 1 == . );

if ($ csv -> parse ( $ _) ) {

my @ colunas = $ csv- > fields ();

# exibição cada registro em uma linha separada
impressão

" Estado (Capital) : $ columns [0] \\ n \\ Trank :

$ colunas [1] \\ r \\ n "; }

else {

meu $ err = $ csv -> ; error_input ;

print " Falha ao analisar linha: $ err ";

}

}

perto CSV ;
7

Clique em "Arquivo " e clique em " Salvar". Enter " parse.pl " na caixa " Nome do arquivo " e clique no botão "Salvar" .
8

Clique em "Iniciar " do Windows e , em seguida, clique em " Executar". Digite "cmd" na caixa "Abrir" e clique em " OK" para abrir a janela de linha de comando.
9

Digite " cd \\ " e pressione a tecla "Enter" .

10

Digite " perl parse.pl " no prompt. Pressione a tecla "Enter" para executar a " analisar " script Perl para analisar a " estados" arquivo CSV e exibir seus campos de texto na tela.

Anterior :

Próximo : No
  Os artigos relacionados
·Como limpar o Start & extremidade de uma corda em Perl 
·Como obter o último argumento como uma matriz em Perl 
·Como converter texto para CSV em Perl 
·Como converter de Python para Perl 
·Como usar Strict em um script Perl 
·Como usar uma instrução switch em Perl 
·Como arredondar para um número inteiro em Perl 
·Como determinar como os elementos Muitos estão em um a…
·Como passar parâmetros para sub-rotinas em Perl 
·Como fazer um diretório no Perl com um script 
  Artigos em destaque
·SQL não suportado Dados Tipo de erro em Integer Coluna…
·Como construir seu próprio sistema solar em Java 
·Como criar um redirecionamento PHP para um Afiliado 
·Como instalar o Java 7 
·Flash MX Jogo Tutorial 
·Ferramentas de Linha de Comando Registro 
·Como criar uma caixa de texto no Visual C # 
·Como manter o Input Mensagem Same Quando Cancelar é pr…
·Access 2007 e MySQL 
·Como usar algoritmos de criptografia no Visual C + + 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados