Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: One Liner to double quote every field in a delimited file

by Tux (Monsignor)
on Jan 31, 2014 at 21:43 UTC ( #1072918=note: print w/ replies, xml ) Need Help??


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)'

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

Enjoy, Have FUN! H.Merijn


Comment on Re: One Liner to double quote every field in a delimited file
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1072918]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (8)
As of 2014-10-02 11:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    What is your favourite meta-syntactic variable name?














    Results (55 votes), past polls