CSV (valori separati da virgola) file contengono campi di testo o numerici che sono separati da virgole. Si tratta di un formato di file comunemente utilizzato per lo scambio di dati tra programmi di calcolo, come Microsoft Excel o Microsoft Works e applicazioni utente. I valori di testo in file CSV sono circondati da personaggi virgolette. Il linguaggio Perl fornisce il modulo "Text :: CSV" per l'analisi di dati CSV, che vi dà la possibilità di eseguire la corretta ripartizione di un file CSV nel vostro programma Perl, se i campi di testo nel file includono le virgole. Il modo più semplice per mostrare questo processo è di usare un esempio, come un elenco di stati e capitali.

istruzione

1 Fai clic su "Start" di Windows, selezionare "Microsoft Works" e poi cliccare su "Microsoft Works foglio di calcolo."

2 Inserire i seguenti dati nelle prime 11 righe della colonna "A":

Capitale di Stato)

Alabama

California, Sacramento

Delaware

Florida

Georgia, Atlanta

Hawaii

Idaho

Kansas

Maine

Ohio, Columbus

3 Inserire i seguenti dati nelle prime 11 righe della colonna "B":

Rango

23

2

36

9

18

42

46

38

29

15

4 Fai clic su "File" e poi su "Salva con nome". Inserire "states.csv" nella casella "Nome file". Scegliere il "(.csv) Testo e le virgole" opzione dalla casella "Salva come" e fare clic sul pulsante "Salva".

5 Fare clic su "Start" di Windows e quindi fare clic su "Blocco note" per aprire l'editor di testo Blocco note.

6 Aggiungere il seguente codice nella finestra aperta:

use strict;

use warnings;

utilizzare Text :: CSV_XS; file aperto per l'analisi

my $file = 'c:\states.csv'; definire la variabile campo di testo

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

aperto (CSV, "& lt;", $ file) or die $ !; abbattere il file in record di testo

while (<CSV>) {

successivo if ($ == 1.);

if ($ CSV> parse ($ _)) {

i miei @columns = $ CSV> campi (); visualizzare ogni record su una riga separata

print "State (Capital): $columns[0]\n\tRank:

$ colonne [1] \ r \ n ";

} else {

il mio $ err = $ CSV> error_input;

print "Impossibile analizzare la linea: $ err";

}

}

chiudere CSV;

7 Fai clic su "File" e poi su "Salva". Inserire "parse.pl" nella casella "Nome file" e fare clic sul pulsante "Salva".

8 Fare clic su "Start" di Windows e quindi fare clic su "Esegui". Inserire "cmd" nella casella "Apri" e fare clic su "OK" per aprire la finestra della riga di comando.

9 Digitare "cd \" e premere il tasto "Enter".

10 Digitare "perl parse.pl" al prompt. Premere il tasto "Enter" per eseguire il "analizzare" script in Perl per analizzare il file "Stati" CSV e visualizzare i suoi campi di testo sullo schermo.