Aber wie funktioniert das Ganze? Das Modul LWP::Simple enthaelt die Funktion head(). Dieser einen URL uebergeben, und sie schickt die HTTP-Request-Methode HEAD (Bruder von GET und POST) an die angegebene URL. Die Funktion bekommt nur den HTTP-Header zurueck, und nicht den eigentlichen Inhalt. Somit kann ganz einfach ueberpruefen werden, ob man die Dateien noch herunterladen kann oder nicht. Sind alle Links OK, wird All: OK angezeigt. Alle Links, die nicht mehr gueltig sind, werden als FAILT angezeigt. Das Script ist extra fuer rapidshare.com ausgelegt. Zwar koennen auch andere Links eingegeben werden, aber dann koennte das Ergebnis nicht stimmen. Ist die content-length vom HTTP-Header kleiner als 10000 Byte, wird der Link als ungueltig angezeigt. Dieses Limit kann natuerlich beliebig angepasst werden. Zum Beispiel wird bei einem Link FAILT angezeigt, der auf eine Seite zeigt, die weniger als 10000 Bytes beinhaltet. Da aber die meisten RapidShare-File 100 MB haben, kann man damit genau feststellen, ob Dateien noch gueltig sind. Es darf nur ein Link pro Zeile angegeben werden.

Benoetigte Perl-Module

• CGI
• LWP::Simple

Installation

1. Herunterladen von rscheck-1.0.0.zip
2. Entpacken mit unzip rscheck-1.0.0.zip
3. Rechte setzen, damit der HTTP-Prozess dieses Script ausfuehren kann: chmod 755 install.pl rscheck.pl
4. Mit ./install.pl kann man ueberpruefen ob die noetigen Module, in dem Fall CGI und LWP::Simple, auf dem Rechner installiert sind. Sind sie nicht installiert, fragt einem das Script, ob man die fehlenden Module nach installieren will. install.pl muss ueber die Konsole ausgefuehrt werden.
5. Damit rscheck.pl auch mit den Browser funktioniert, muss das Script eventuell auf rscheck.cgi umbenannt werden und in einen CGI-Ordner (/cgi-bin/) verschoben werden. Andernfalls eine .htaccess im gleichen Ordner anlegen und Options +ExecCgi hinein schreiben.
6. Fertig. Jetzt kann mit dem Browser auf die rscheck.pl zugeriffen werden.

Download

• rscheck-1.0.0.zip