I file CSV (valori separati da virgola) contengono campi di testo o numerici che sono separati da virgole. È un comune formato di file utilizzato per lo scambio di dati tra programmi di foglio di calcolo, ad esempio Microsoft Excel o Microsoft Works e applicazioni utente. I valori di testo nei file CSV sono circondati da caratteri di virgolette doppie. Il linguaggio Perl si fornisce con il modulo "Testo:: CSV" per l'analisi dei dati CSV, che vi dà la possibilità di eseguire la ripartizione corretta di un file CSV nel programma Perl, se i campi di testo nel file includono una virgola. Il modo più semplice per mostrare questo processo consiste nell'utilizzare un esempio, ad esempio un elenco di Stati e capitali.

Istruzioni

1

Fare clic su "Start" in Windows, selezionare "Microsoft Works" e quindi fare clic su "Foglio di calcolo di Microsoft Works."

2

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

Stato (capitale)

Alabama

California, Sacramento

Delaware

Florida

Georgia, Atlanta

Hawaii

Idaho

Kansas

Maine

Ohio, Columbus

3

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

Rango

23

2

36

9

18

42

46

38

29

15

4

Fare clic su "File" e scegliere "Salva come". Immettere "states.csv" nella casella "Nome File". Scegliere l'opzione "Testo e virgole (CSV)" dalla casella "Salva come tipo" e clicca sul pulsante "Salva".

5

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

6

Aggiungere il codice seguente nella finestra aperta:

uso rigoroso;

use warnings;

use Text::CSV_XS;Aprire il file per l'analisi

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

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

open (CSV, "<", $file) or die $!;suddividere il file in record di testo

while (<CSV>) {

next if ($. == 1);

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

my @columns = $csv->fields();visualizzare ogni record su una riga separata

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

$columns [1] \r\n";

} else {

my $err = $csv->error_input;

print "Failed to parse line: $err";

}

}

close CSV;7

Fare clic su "File" e quindi fare clic su "Salva". Immettere "parse.pl" nella casella "Nome File" e clicca sul pulsante "Salva".

8

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

9

Digitare "cd \" e premere il tasto "Invio".

10

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