Hi,
benutze doch einfach LWP::Simple und head():
#usr/bin/perl
use LWP::Simple;
$content = head ($url);
if ($content)
{ print "online"; }
else
{ print "offline"; }
Tschö...
Alex :)
Hi,
benutze doch einfach LWP::Simple und head():
#usr/bin/perl
use LWP::Simple;
$content = head ($url);
if ($content)
{ print "online"; }
else
{ print "offline"; }
Tschö...
Alex :)