Select Code to Download

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

$ 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