in reply to deleting commas enclosed by quotation marks

Greetings all,
Yet another way to go about it:
$string = '7374,726327,"76,237",32324,"21,342,857",23';
$string =~ s/("[^"]+")/my $tmp = $1; $tmp =~ s!,!!g; $tmp/eg;
print $string;

[download]
outputs 
7374,726327,"76237",32324,"21342857",23

[download]

-InjunJoel
"I do not feel obliged to believe that the same God who endowed us with sense, reason and intellect has intended us to forego their use." -Galileo

In Section Seekers of Perl Wisdom