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:
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:
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