CSV importieren mit Komplikation (Allgemeines zu Perl)

[thread]20781[/thread]

CSV importieren mit Komplikation

Tags: perl5 Ähnliche Threads

Leser: 11

Articles: hide open all | hide show old branches

+5 replies
chmod777

2020-05-23 16:00
User since
2009-09-14
82 Artikel
BenutzerIn
Hi & bitte um Hilfe!

ich sollte eine CSV-Datei auslesen und die Daten in eine Datenbank schreiben.
Das ist per se keine große Herausforderung.

Jetzt kommmts:
Der Feldtrenner ist ein Komma ',' ABER es gibt auch Textfelder, die sind von Anführungszeichen '"' eingeschlossen und können ebenfalls Kommas enthalten. Das sieht dann ungefähr so aus:
Code: (dl )

1,2,3,4,"hier, ein Text",7,8,"und, noch ein Text"
und damit stellt sich auch das Problem dar: gibt man das Komma als Feldtrenner an, wird auch das Komma im Textfeld als Trenner identifiziert.

Wie kann man das Komma im Textfeld übergehen bzw. ignorieren?

thanks & greets!
- murphy
  
  2020-05-23 17:47
  User since
  2004-07-19
  1776 Artikel
  HausmeisterIn
  Für nicht komplett triviale Fälle von CSV-Daten wie diesen empfiehlt es sich, einen gescheiten Parser zu benutzen statt zu versuchen, die Daten irgendwie mit regulären Ausdrücken auseinanderzupflücken. Kanonisch wäre da das Modul Text::CSV:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14
  
  use 5.012; use warnings; use Text::CSV; my $csv = Text::CSV->new({ sep => ',', quote => '"' }); use Data::Dumper; while (my $row = $csv->getline(\*DATA)) { print Dumper $row; } __DATA__ 1,2,3,4,"hier, ein Text",7,8,"und, noch ein Text"
  
  When C++ is your hammer, every problem looks like your thumb.
- +3 replies
- GwenDragon
  
  2020-05-24 10:40
  
  User since
  2005-01-17
  14866 Artikel
  Admin1
  
  Wahlweise auch das schnellere Text::CSV_XS zum Parsen con CSV-Inhalten.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +2 replies
  - haj
    
    2020-05-24 13:09
    
    User since
    2015-01-07
    592 Artikel
    BenutzerIn
    
    2020-05-24T08:40:19 GwenDragon
    Wahlweise auch das schnellere Text::CSV_XS zum Parsen con CSV-Inhalten.
    
    Das braucht's nicht mehr: Text::CSV zieht automatisch die XS-Variante, wenn sie verfügbar ist.
    - GwenDragon
      
      2020-05-24 13:35
      
      User since
      2005-01-17
      14866 Artikel
      Admin1
      
      Stimmt, ja.
      Ich hatte früher mal die CSV_PP-Version, wenn XS nicht möglich auf Webhosting. Daher verwechselt.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2020-05-23 16:00.