http://www.perlmonks.org?node_id=1072918


in reply to One Liner to double quote every field in a delimited file

I am still testing, but the next release of Text::CSV_XS will offer that as

$ perl -MText::CSV_XS=csv -we'csv (in => csv (file => "file.csv"), out
+ => *STDOUT, always_quote => 1)'

[download]

I expect to release somewhere next week.

A longer one-liner that works with Text::CSV_XS right now is:

$ perl -MText::CSV_XS -we'$c=Text::CSV_XS->new;$a=$c->getline_all(\*AR
+GV);$c->eol($/);$c->always_quote(1);$c->print(\*STDOUT,$_)for@$a' fil
+e.csv

[download]

Enjoy, Have FUN! H.Merijn

In Section Seekers of Perl Wisdom