Linuxer+2008-08-10 23:00:45--

Code (perl): (dl )

1
2
3
4
5
6

use strict;
use warnings;

my $text = q~abc;123;ab\;12;zzz;yyy;~;

my @fields = split m{(?<!\\);}, $text;

[...]

Und wenn jemand einen gequoteten Backslash in die Datei schreibt -- also zum Beispiel abc;d\\;ef -- verhält sich dieser Regex wieder falsch...

Da würde ich doch auch lieber auf ein Modul zurückgreifen, dass CSV ordentlich parsen kann.