nicht angemeldet
Hallo Nina!
Du brauchst ein Array, in welches Du die zu sperrenden IP-Adressen angeben kannst:
@badIP = ('','222.222.222.222','111.111.111.111', und so weiter und so fort);
und hier wird die REMOTE_ADDR (IP) geprüft:
foreach $badIP (@badIP)
{
if ($ENV{REMOTE_ADDR} eq $badIP)
{
&text;
}
}
sub text
{
print "Sorry, Sie dürfen diese Seite nicht aufrufen, weil ich Sie gesperrt habe, Sie..., Sie... <g>\n;"
}
Bedenke aber, das IP Sperren in Zeiten von dynamisch vergebenen IPs wenig wirksam sind.
Vielleicht aber haben unsere PERL-Profis bessere Lösungen im petto!
Bis danndann
PAF (patrickausfrankfurt)
<img src="/selfaktuell/extras/selfcomm.jpg" alt=""> http://www.atomic-eggs.com/selfspezial/guests/advguest.cgi?view