en perl cela se fait tout seul avec lwp

un truc du style

use LWP::UserAgent;
use HTTP::Request::Common;
$urlq="http://www.monserver.com/mapage.html";;
my $ua = new LWP::UserAgent;
$ua->agent('Mon crawler');
my $res = $ua->request(GET $urlq);

if  ($res->is_success) {
# le site est ok
}else {
# le site est en erreur 404, 500 ...
}


Bien � vous
Philippe
http://www.devparadise.com/



----- Original Message -----
From: "Klaus" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, October 29, 2001 2:09 PM
Subject: Re: [Confirme] v�rifier des sites


> Le Lundi 29 Octobre 2001 10:56, vous avez �crit :
> > Le Mon, Oct 29, 2001 at 01:48:00AM +0100, vous ( [EMAIL PROTECTED] )
> avez �crit :
> > > Salut,
> > >
> > > sur un annuaire avec environ 400 sites r�f�renc�s (php/mysql chez
free);
> > > je voudrais p�riodiquement v�rifier la validit� des sites pour pouvoir
> > > jeter ceux qui ne sont plus valables. Comment faire ? J'ai en vain
> > > cherch� un script de ce genre sur les sites php.
> >
> > Hm, et tu veux v�ri�fi� quoi ?
>
> Si les sites existent toujours et si mes adresses http://www.... sont
> toujours correctes
> Klaus
>
>
> --
> l'annuaire des sites d'allemand:
> http://katalogdeutsch.free.fr
>
>


----------------------------------------------------------------------------
----


> Vous souhaitez acquerir votre Pack ou des Services MandrakeSoft?
> Rendez-vous sur "http://www.mandrakestore.com";
>


Vous souhaitez acquerir votre Pack ou des Services MandrakeSoft?
Rendez-vous sur "http://www.mandrakestore.com";

Répondre à