Urls checken mit perl

hiho,

kennt einer von euch eine einfache „kochbuch“ methode, wie ich mit perl herausfinden kann ober ein link noch lebt oder ob er ins nirvana geht ?

zbs. soll http://www.e-gov.admin.ch/index.html auf seine verfügbarkeit geprüft werden

gruss und merci

Flöru

kennt einer von euch eine einfache „kochbuch“ methode, wie ich
mit perl herausfinden kann ober ein link noch lebt oder ob er
ins nirvana geht ?

perldoc LWP::Simple

head($url)
Get document headers. Returns the following 5 values if successful:
($content_type, $document_length, $modified_time, $expires, $server)
Returns an empty list if it fails. In scalar context returns TRUE if successful.

Bsp:

use LWP::Simple;

my $alive = head($link);

einfacher geht’s nicht mehr … :smile:

Klaus

merci :wink:

noch ne kurze Frage … habs mir runtergeladen … muss ich das teil jetzt einfach nach /usr/lib/perl5/5irgendwas/LWP kopieren ?

(sprich LWP erstellen …)

gruss

Flöru

noch ne kurze Frage … habs mir runtergeladen … muss ich
das teil jetzt einfach nach /usr/lib/perl5/5irgendwas/LWP
kopieren ?

(sprich LWP erstellen …)

Normalerweise ist es bei allen Distributionen bereits dabei.
Wenn nicht, dann muß es installiert werden - i.d.R. aber nicht durch einfaches Kopieren …
siehe Install Dokus in libwww-perl-5.53 vom 10.04.2001 auf http://www.cpan.org (libwww-perl-5.53.tar.gz)

siehe u.a. enthaltenes „Readme“:
perl Makefile.PL
make
make test
make install

Klaus