CSV ( Comma -Separated Value ) is een speciaal bestandsformaat dat gebruikt wordt om spreadsheet gegevens van de ene toepassing naar de andere . In CSV -indeling wordt opgeslagen in een eenvoudige tekstbestand met de waarden in elke rij gescheiden door komma's en elke rij gescheiden door een spatie . Meestal , maar niet altijd , de eerste lijn wordt gebruikt om de naam van de kolommen geven . Bijvoorbeeld , zou de volgende tekst deel uitmaakt van een CSV- spreadsheet voor boeken zijn : " Title " , " Author ", " Romeo en Julia " , " William Shakespeare " "Hamlet " , " William Shakespeare " Lees CSV-bestanden in de programmeertaal Perl met behulp van de tekst :: CSV bibliotheek . Instructies
1 Maak een nieuw tekstbestand in een teksteditor . Elke tekstverwerker zal doen , zoals Windows Notepad , maar het bestand moet eindigen met de " . Pl " extensie en niet " . Txt " of " . Rtf . "
Paste 2 de volgende handtekening op de eerste regel van het tekstbestand . Hoewel niet verplicht , het helpt als je je werk aan anderen of vergeet later welke taal het script wordt gebruikt .
# ! /Usr /bin /perl
3 Voeg de volgende regel toe aan het tekstbestand naar de Perl CSV parsing library te importeren : gebruik tekst
:: CSV ;
Parse 4 en print de inhoud van een CSV-bestand door het te plakken deze lijnen : mijn $ input
= ' file.csv ' ;
mijn $ parser = Text :: CSV - > new ( ) ;
geopend ( CSV , " < " , $ input ) ;
terwijl ( ) {if ( $ parser - > parse ( $ _ ) ) { mijn @ columns = $ parser - > velden ( ) ; print " @ kolommen \\ n " ; } } afsluiten CSV ; .
Vervang ' file.csv ' met de naam van het CSV-bestand te parsen
|
