Select Code to Download

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

"the, sample, string",345,43","A, next , string",12,-90
"the# sample# string",345,43","A# next # string",12,-90'