Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re: Re: Re: Last mod not working

by monktim (Friar)
on Jan 28, 2004 at 18:51 UTC ( #324736=note: print w/replies, xml ) Need Help??


in reply to Re: Re: Last mod not working
in thread Last mod not working

That's correct. Even with the http:// prefix as derby suggested, the modified time isn't passed back. Your code is fine, you just need to check if the values are defined.
use LWP::Simple; use warnings; use strict; my $url = 'http://www.perl.com'; my $content = get($url); my (@header) = head($url); print "content type: $header[0]\n" if defined $header[0]; print "document length: $header[1]\n" if defined $header[1]; print "modified time: $header[2]\n" if defined $header[2]; print "expires: $header[3]\n" if defined $header[3]; print "server: $header[4]\n" if defined $header[4];

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://324736]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2022-12-09 01:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?