- or download this
perl -MText::CSV -lpe 'BEGIN{$c=Text::CSV->new({always_quote=>1})} $c-
+>parse($_); $c->combine($c->fields); $_=$c->string' textfile.csv
- or download this
perl -MText::CSV -lne 'BEGIN{$c=Text::CSV->new({always_quote=>1})} $c-
+>parse($_); $c->print(\*STDOUT,[$c->fields])' textfile.csv
- or download this
cat infile.csv | quotecsv > newfile.csv