http://www.perlmonks.org?node_id=1016479

perlCrazy has asked for the wisdom of the Perl Monks concerning the following question:

have file which has line like this:
123,abc1,test1,"1,3,5",new,"abc,dfg,hj" 124,abc2,test2,"1,3,5",new,"abc,dfg,hj" 125,abc3*,test3,"*|1,3,5",new,"abc,dfg,hj"
Value of each line has field which is ',' delimited. Field which starts with double quotes(") is one filed which itself is comma delimited.
Is there anyway to replace the ',' with some other value ~ while reading each line between double quotes (") ? Thanks for help.