####
use LWP::Simple;
use HTTP::Headers;
use HTML::HeadParser;
$h = HTTP::Headers->new;
$p = HTML::HeadParser->new($h);
$url = 'http://www.thisismysite.com';
$content = get($url);
$p->parse($content);
print $h->header('Title')."\n";
print $h->header('Content-Base')."\n"; #This does not print
print $h->header('Last-Modified')."\n"; #This does not print
print $h->header('Content-Length')."\n"; #This does not print
print $h->header('Meta name')."\n"; #This does not print