Du meinst das sicher so:
Ein Link in einer beliebigen statischen HTML-Seite [Überraschungslink hier klicken],
und wenn man draufklickt erscheint wöchentlich eine andere URL.
Diesmal muß also die URL in die Browseradreßzeile geschrieben werden. Ich hab die link.txt jetzt linkblank.txt genannt, da der Inhalt jetzt anders aussieht.
Die "wochenlink_weiter.pl" sieht so aus:
Code:
|
#!/usr/bin/perl
# die linkblank.txt sieht jetzt so aus
# http://www.google.de
# http://www.yahooh.de
$day_of_year = (localtime(time()))[7];
$week_of_year = int($day_of_year / 7);
open(DAT,"<linkblank.txt");
$i=0;
while(<DAT>){
if($i>=$week_of_year){
$link = $_;
last;
}
$i++;
}
close DAT;
print "Location: $linknn";
exit;
|
|
Demo mit HTML-Seite
und Link zur "wochenlink_weiter.pl" hier:
http://sperner.50free.net/forum/wochenlink/wochenlink_weiter.html