in reply to How do I surround commas with escaped double-quotes?

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

[download]
Prints: 
This\",\" that\",\" and those

[download]

In Section Seekers of Perl Wisdom