Select Code to Download

C:\test>type junk.txt
1, 1.2, -3000, fred, "bill & ben", "there's no business like show busi
+ness", 'stuff, with, commas'
...
1 1.2 -3000 fred bill & ben there's no business like show business stu
+ff, with, commas

C:\test>

C:\test>perl -ne "my @a; eval qq[\@a = ($_);];print $_, $/ for @a" jun
+k.txt
1
...
stuff, with, commas

C:\test>