hur man läser csv -filer i perl

CSV ( kommaseparerade värden ) är ett speciellt filformat som används för att överföra data från kalkylark från ett program till ett annat . Data i CSV -format lagras i en grundläggande textfil med de värden i varje rad separeras med kommatecken och varje rad åtskilda av mellanslag . Oftast , men inte alltid, är den första raden används för att ange namnet på kolumnerna . Till exempel kan följande text ingå i en CSV- kalkylblad för böcker :

”Titel” , ” Författare ”

” Romeo och Juliet ” , ” William Shakespeare ”

” Hamlet ” , ” William Shakespeare ”

Läs CSV -filer i Perl programmeringsspråk med hjälp av Text : : CSV bibliotek .
1 .
Skapa en ny textfil i en textredigerare . Valfri textredigerare kommer att göra , inklusive Windows Anteckningar , men filen måste sluta med ” . PL ”filtillägg och inte ” . txt ”eller” . rtf . ”
2 .
Klistra följande signatur till första raden i textfilen. Även om de inte behövs , hjälper det om du distribuerar ditt arbete till andra eller glömma senare vilket språk scriptet använder .

# ! /usr /bin /perl
.
3
Lägg till följande rad i textfilen för att importera Perl CSV parsing bibliotek :

använda Text : : CSV ,

4 .
Analysera och skriva ut innehållet i en CSV -fil genom att klistra in dessa rader :

min $ input=&#039 file. csv &#039 ;

min $ parser=Text : : CSV-> Ny () ;

öppna ( CSV , ” <, " , $ input ) ; medan ( ) {

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

min @ columns=$ parser-> fält () ;

skriva ”@ kolumner \ n ”;

}

}

nära CSV ,

Ersätt ” file. csv ” med namnet på CSV -filen för att tolka .

tips och varningar