in reply to Numbers only in a string
my $s = '1-(800)-223-5555';
(my $n = $s) =~ y/0-9//cd;
Fruit and Vegetables
Me, that's why I'm so cool
Logic (separated into Horror and Brilliance)
Results (285 votes). Check out past polls.