Select Code to Download

s/(,)|(".*?")/ $1 || $2 =~ s(,)( )gr /ge;

s/(,)|(".*?")/ $1 || do { (my $s = $2) =~ s(,)( )g; $s } /ge;