CSV (Comma - Separated Value ) ist ein spezielles Dateiformat verwendet, um Tabellenkalkulation Daten aus einer Anwendung in eine andere zu übertragen . Daten im CSV-Format ist in einem grundlegenden Text-Datei mit den Werten in jeder Zeile durch Kommata getrennt und jede Zeile durch Leerzeichen abgetrennt, getrennt gespeichert. In der Regel , aber nicht immer , wird die erste Zeile verwendet, um den Namen der Spalten ist . Zum Beispiel der folgende Text könnte Teil einer CSV-Tabelle für Bücher sein : "Titel", " Autor " "Romeo und Julia ", " William Shakespeare" " Hamlet ", " William Shakespeare" lesen CSV-Dateien in der Programmiersprache Perl mit dem Text :: CSV Bibliothek. Anleitung
1
Erstellen Sie eine neue Textdatei in einem Texteditor. Jeder Texteditor tun wird, einschließlich Windows Notepad , aber sollte die Datei mit der " . Pl " Datei-Endung zu beenden und nicht " . Txt " oder " . Rtf . "
2
Paste die folgende Signatur auf die erste Zeile der Textdatei . Obwohl es nicht erforderlich ist, hilft es, wenn Sie Ihre Arbeit an andere verteilen oder später vergessen , welche Sprache das Skript verwendet.
#! /Usr /bin /perl
3
Fügen Sie folgende Zeile in die Textdatei , um die Perl CSV Parsing -Bibliothek zu importieren :
Verwendung Text :: CSV ;
4
Parse und ausdrucken der Inhalte einer CSV-Datei durch Einfügen diese Zeilen :
my $ input = ' file.csv ';
my $ parser = Text :: CSV -> new ();
open ( CSV, "<" , $ input );
while ( ) {if ( $ parser -> parse ( $ _ )) { my @ Spalten = $ parser- > Felder ( ); print " @ Spalten \\ n"; }} close CSV ; .
Ersetzen ' file.csv " mit dem Namen der CSV-Datei zu analysieren