Erste CSV-Zeile als Stringnamen verwenden - #141849 (Allgemeines zu Perl)

payx

2010-10-12 21:02

User since
2006-05-04
564 Artikel
BenutzerIn

user image

Hallo Steven,

meinst Du, dass die erste Zeile die Überschriften enthält?

Dann ist der Vorschlag von Bianca im Prinzip gut, die Werte aus der ersten Zeile könnten die keys eines HoA sein, die values jeweils ArrayRefs mit den dazugehörigen Werten.

Es kommt natürlich darauf an, wie Du die Daten weiterverarbeiten willst.

Vielleicht ist auch so ein Ansatz gut für Deine Zwecke:

Code (perl): (dl )

#!/usr/bin/perl

use strict;
use warnings;

my $csvPath; # Pfad zu Deinem csv-Dokument

open my $csvFH, "<", $csvPath or die $!;

my @header = split /;/, <$csvFH>;

print join "\t", @header;

while (my @row = split /;/, <$csvFH>) {
    print join "\t", @row;
}

HTH
Grüße
payx