I've just found a new Module: Text::CSV_XS, which is a newer and faster solution than Text::CSV. It is partially implemented in C.

use Text::CSV_XS;
my $csv = Text::CSV->new;

# reading
$csv->parse(<STDIN>);
my @fields = $csv->fields;

#or writing:

$csv->combine(@fields);
print $csv->string;
[download]

I found this module via "Data Munging" from David Cross

Best regards,
perl -le "s==*F=e=>y~\*martinF~stronat~=>s~[^\w]~~g=>chop,print"