Sådan Parse CSV i Perl

Sådan Parse CSV i Perl


CSV (kommaseparerede værdier) filer indeholder tekst eller numeriske felter, som er adskilt af kommaer. Det er en fælles filformat, der bruges til at udveksle data mellem regnearksprogrammer såsom Microsoft Excel eller Microsoft Works, og bruger applikationer. Teksten værdier i CSV-filer er omgivet af anførselstegn tegn. Den Perl sprog giver dig den "Tekst :: CSV" modul til parsing af CSV data, som giver dig mulighed for at udføre den korrekte fordeling af en CSV-fil i din Perl-program, hvis tekstfelter i filen indeholde kommaer. Den nemmeste måde at vise denne proces er at bruge et eksempel, såsom en liste over stater og hovedstæder.

Vejledning

1

Klik på "Start" i Windows, skal du vælge "Microsoft Works", og derefter klikke på "Microsoft Works regneark."

2

Indtast følgende data i de første 11 rækker af "A" kolonne:

Stat (Capital)

Alabama

California, Sacramento

Delaware

Florida

Georgia, Atlanta

Hawaii

Idaho

Kansas

Maine

Ohio, Columbus

3

Indtast følgende data i de første 11 rækker i kolonne "b":

Rank

23

2

36

9

18

42

46

38

29

15

4

Klik på "File" og klik på "Gem som". Skriv "states.csv" i "File Name" feltet. Vælg "Tekst & kommaer (.csv)" fra "Gem som type", og klik på "Gem" knappen.

5

Klik på "Start" i Windows og derefter klikke på "Notesblok" for at åbne Notesblok teksteditor.

6

Føj følgende kode i det åbne vindue:

bruge streng;

use warnings;

use Text::CSV_XS; åben fil til parsing

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

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

open (CSV, "<", $file) or die $!; nedbryde filen i tekstrecords

while (<CSV>) {

next if ($. == 1);

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

my @columns = $csv->fields(); vist hver post på en separat linje

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

$ kolonner [1] \ r \ n ";

} else {

my $err = $csv->error_input;

print "Failed to parse line: $err";

}

}

close CSV; 7

Klik på "File" og klik på "Gem". Skriv "parse.pl" i "File Name" feltet og klik på "Gem" knappen.

8

Klik på "Start" i Windows og derefter klikke på "Run". Indtast "cmd" i "Åbn", og klik på "OK" for at åbne kommandolinjen vinduet.

9

Skriv "cd \", og tryk på "Enter" -tasten.

10

Skriv "perl parse.pl" ved prompten. Tryk på "Enter" tasten for at køre "parse" Perl script til parse "hedder" CSV-fil og vise sine tekstfelter på skærmen.


relaterade artiklar