Torwächter: Weiterleitung durch Auslesen der besucher-IP-Adresse

Beitrag lesen

Ja, ich glaub auch ohne Kommentar geholfen zu haben.

#!/usr/bin/perl
#Standart header des Perlscripts

$ip = $ENV{'REMOTE_ADDR'};
#einlesen der IP des ankommenden

print "Content-type: text/html\n\n";
#Ausgabe ist HTML

if($ip eq "127.0.0.1")   #wenn die IP 127.0.0.1 ist dann...
{
print "Location: http://www.ok.de/\n\n;   #...gehe zu ok
}
else   #wenn nicht 127.0.0.1 dann...
{
print "Location: http://www.failed.de/\n\n;   #gehe zu failed
}

Gruß
Torwächter