Perl function to fetch html code

Hi, I need a perl function "grab" that retrieves all URLs in @urls and put their contents into an array (where $array[0] holds the content of $url[0], etc). If timeout is exceeded, content will be "timeout". It's important that this function can very efficiently deal with a large number of URLs. In the past I've used LWP::Parallel::UserAgent to accomplish this. I'd like to use the code as shown in the script example below, so please formulate your function so that I can drop it into the script below and it will work. Thank you. Also, please take a look at the Google answer solution page at [login to view URL] . It shows the solution I've obtained for the same issue back in 2004, using LWP::Parallel::UserAgent. Looking at it might give you some useful pointers. However, the solution on that page doesn't work anymore because of a recently emerged problem with LWP::ParallelUserAgent which is explained at [login to view URL] (it's because of that problem I've posted this project here). THe script will have to run in a [login to view URL] environment and current it seems that LWP::ParallelUserAgent is not working with the pre-installed version of LWP on Bluehost. So it would be preferable to have a solution that does not depend on LWP::ParallelUserAgent at all but still is capable of quickly retrieving a large number of URLs. Thank you. Marc. #!/usr/bin/perl @urls=("[login to view URL]", "[login to view URL]", "[login to view URL]"); $timeout = 20; # each request times out after 20 seconds) @content = &grab(@urls); print "everything grabed"; exit; sub grab { # your grab function here }