Not your original question, but have you considered using their API rather than scraping?

(As for the original question, look at the docs for alarm or Sys::SigAction's timeout_call and wrap your hanging call in something like that.)