#!c:/perl/bin/perl $string='"the, sample, string",345,43","A, next , string",12,-90'; print "$string\n"; #######$string=~ s///g ; print "$string\n";