http://qs321.pair.com?node_id=5352

capa has asked for the wisdom of the Perl Monks concerning the following question:

I need modified time for a web page, and i tried head() function from LWP::Simple interface. An example: i wrote the following test script
#!/usr/bin/perl
use LWP::Simple;
($content_type, $document_length, $modified_time, $expires, $server) = 
    head $ARGV[0];
print("$content_type <> ",
      "$document_length <> ",
      "$modified_time <> ",
      "$expires <> ",
      "$server\n");
and then i run it:
bash$ ./test_head.pl http://localhost/tmp
text/html <>  <> Apache/1.3.9 (Unix) Debian/GNU PHP/3.0.14 <>  <> 
bash$ ./test_head.pl http://localhost/   
text/html <> 274 <> 953031425 <> Apache/1.3.9 (Unix) Debian/GNU PHP/3.0.14 <>
bash$ ./test_head.pl http://localhost/index.html
text/html <> 274 <> 953031425 <> Apache/1.3.9 (Unix) Debian/GNU PHP/3.0.14 <> 
As you can see server is not the last item of list returned by head, in fact it has no fixed position in that list. What's wrong? Thanks.

Originally posted as a Categorized Question.