I am trying to run the following code
$>perl -e 'use
LWP;$b=LWP::UserAgent->new;$s=time;$r=$b->head("http://www.faq.org");$e=time;$v=$e-$s;print
$v,"sec\n" if($r->is_success)'
# tried set agent, but it is the same.
which prints nothing and indicates it can't reach the
site. however i can access the site by browser.
also i tried acess some sites by LWP and browser. it
takes in no time to access by browser, but take longer
time to acess by LWP. my case difference is 10 sec or
more.
I need to get accurate info if a webserver can respone
fast enough. so that 10 sec difference makes me feel
the server slow but it's not.
am i miss something ? what to do to make it work the
right way? or any other module ?
James.
__________________________________________________
Do You Yahoo!?
Yahoo! Health - Feel better, live better
http://health.yahoo.com