$foo = "spider9832man23";
print "count = " . $foo =~ y/0-9//;