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