in reply to Regex to match string with numbers with possible comma

=~ /AltaVista found (/d+(,/d+)*) results/;

[download]

In Section Seekers of Perl Wisdom