$string= "This, that, and those";
$string =~ s/,/\\",\\"/g;
print $string;

##</code><code>##

This\",\" that\",\" and those