Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

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

by Tux (Abbot)
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

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1072918]
[chacham]: Just paint the white house black again.
dbander snorts
LanX Gesundheit! :)
talexb wonders about dividing developers in those born before the Unix timestamp of zero .. and after. Spoiler: I'm before.
chacham remebers I am a mad scientist
[stevieb]: talexb I'm after by a few years, but we can still be friends because you live in my hometown ;)
[LanX]: White House

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (11)
As of 2017-08-18 13:26 GMT
Find Nodes?
    Voting Booth?
    Who is your favorite scientist and why?

    Results (302 votes). Check out past polls.