in reply to Replace commas with spaces between quotes, parsing CSV
Here's mine, a different approach, based on the idea "replace what you want to keep by itself":
This requires a "fairly recent" perl, though I'm unsure exactly when s///r was introduced.s/(,)|(".*?")/ $1 || $2 =~ s(,)( )gr /ge;
For older (and for newer) perls, you can use the slightly more verbose:
s/(,)|(".*?")/ $1 || do { (my $s = $2) =~ s(,)( )g; $s } /ge;
In Section
Seekers of Perl Wisdom