nntp2http.com
Posting
Suche
Optionen
Hilfe & Kontakt

Re: umlautproblem

Von: Gerhard Wolf (quisquiliae@gmx.de) [Profil]
Datum: 06.10.2009 21:38
Message-ID: <7j1klvF32h5unU2@mid.individual.net>
Newsgroup: de.comp.lang.perl.misc
> nicht funktioniert? Mir sieht es eher danach aus, dass es am Newline
> liegt.
ok vermutlich auch. Es liegt an den Backslashes.

die erste CSV-Zeile sieht so aus:
"Kontonummer";"Datum";"Valuta";"Geschaftsvorfall";
"Verwendungszweck";"Betrag";"Name";"Konto";"B
LZ"

im Debugger wird $_ nach dem einlesen der 1sten Zeile wie folgt angezeigt:

DB<2> x $_
0 
"\"Kontonummer\";\"Datum\";\"Valuta\";\"Gesch&Atil
de;¤ftsvorfall\";
\"Verwendungszweck\";\"Betrag\";\"Name\";\"Konto\"
;\"BLZ\"\cM\cJ"

mit chomp();

DB<2> x $_
0 
"\"Kontonummer\";\"Datum\";\"Valuta\";\"Gesch&Atil
de;¤ftsvorfall\";
\"Verwendungszweck\";\"Betrag\";\"Name\";\"Konto\"
;\"BLZ\"\cM"

jetzt habe ich versucht die Backslashes mit
s{\\}{}xg;
zu entfernen, was nicht funktioniert ($_ bleibt unverändert)

dann eben $valid_header jeweils 1 Backslash hinzufügen geht auch nicht,
da

my $valid_header
= qq{\"Kontonummer\
\";"Datum";"Valuta";"Geschäftsvorfall";&
quot;Verwendungszweck";"Betrag";"Name";"Konto";"BL
Z"};

entweder 0 oder 2 Backslashes einfügt:

DB<5> x $valid_header
0  '"Kontonummer\
\";"Datum";"Valuta";"Geschäftsvorfall";&
quot;Verwendungszweck";"Betrag";"Name";"Konto";"BL
Z"'

[ Auf dieses Posting antworten ]

Antworten