my $dat = (head('http://web/web.html'))[2];
print "last-modified header value: $dat\n";