Text::CSV mit Tab als Trennzeichen (gelöst) - #165058 (Allgemeines zu Perl)

roli

2013-01-19 19:50

User since
2004-12-31
424 Artikel
BenutzerIn
[default_avatar]

Hallo,

ich habe ein Problem mit Text::CSV und Tabulator als Trennzeichen. Alles suchen hat bislang noch zu keinem Ergebnis geführt, leider.
Folgenden Code habe ich:

Code (perl): (dl )

my $csv = Text::CSV->new({sep_char => "$s_delimiter"});
$csv->parse($s_data);
my $tmp_rc = $csv->parse($s_data);
die "A Error occured while parsing input file: $tmp_rc !\n" if(! $tmp_rc);

@a_data = $csv->fields();
print "Input: > $s_data <\n";
print "Trenner: > $s_delimiter <\n";
print Dumper @a_data;

Die print Zeilen geben folgendes aus:

Code: (dl )

1
2
3

Input: > peter  pan     456 <
Trenner: > \t <
$VAR1 = 'er     pan     456';

Ich hätte jetzt eigentlich ein Array erwartet das die drei Elemente "peter" "pan" "456" enthält, was ja offensichtlich nicht der Fall ist.
Im Input ist definitv auch ein Tab zwischen den "Werten", in dem Dump von @a_data sind die Tabs noch immer drinnen.

Roland
--
"Steh vorn, während du fragst;
sitzen soll, wer antwortet."
Aus "Die Edda des Snorri Sturluson" "Gylfis Täuschung" Strophe 2