in reply to Page Scraping

That's because you're matching link text, not link url. And the regexp is wrong. Use $mech->find_all_links( url_regex => qr/\d{9}/ );.