cat /media/host/export_PYF_NCL.csv | perl -e 'while(<>){print "'"'"'$1'"',"'" if /^(\d+);/}'
A bozo's blog
Monday, January 5, 2015
perl: one-liner with single quotes in
Subscribe to:
Posts (Atom)
A bozo's blog
cat /media/host/export_PYF_NCL.csv | perl -e 'while(<>){print "'"'"'$1'"',"'" if /^(\d+);/}'