Re: Substituting a comma only when it is preceded and followed by a bracket

Another way (if parens aren't nested):

$s = 'blah blah, blah blah blah (blah, blah, blah), blah, blah';

$s =~ s#,(?=[^(]*\))#;#g;

print $s;
blah blah, blah blah blah (blah; blah; blah), blah, blah
[download]

Comment on Re: Substituting a comma only when it is preceded and followed by a bracket Download Code