substr($str,index($str,'"'),rindex($str,'"')-length($str))=~y/,//d;