HTTP Banner einlesen?

[Wolfgang Wiese]

Hi,

da du bestimmt mehr willst als nur den Servername,
gleich die anderen Basicsachen dazu:

------------------------------------------------
$url = "http://www.gmxsucks.de";
use LWP::UserAgent;

$ua= new LWP::UserAgent;
$ua->agent("Swens Head-Checker");

$request= new HTTP::Request('HEAD',$url);
$response = $ua->request($request);
$date = localtime($response->date);
print "date            : $date\n";
$expires = localtime($response->expires);
print "expires         : $expires\n";
$content_type = $response->content_type;
print "content_type    : $content_type\n";
$last_modified = localtime($response->last_modified);
print "last_modified   : $last_modified\n";
$content_encoding = $response->content_encoding;
print "content_encoding: $content_encoding\n";
$content_length = $response->content_length;
print "content_length  : $content_length\n";
$title = $response->title;
print "title           : $title\n";
$server = $response->server;
print "server          : $server\n";
$base=$response->base;
print "base            : $base\n";
print "\n";
------------------------------------------------