Have a look at Regex::Common, there are a number of expressions to extract URLs.

Hope this helps, -gjb-