|
Verfasst am: 01.06.2002 [19:20]
|
|
mgerlitz
Dabei seit: 07.03.2002
Beiträge: 161
|
Hallo!
Wenn nachfolgendes Script domain.de prüft, dann ist alles OK, aber bei subdomain.domain.de wird immer error_url() aufgerufen. Wie kann die Prüfung geändert werden, so daß auch Subdomains funtionieren?
sub check_url {
my(
$ref,
$match
);
if ($ENV{'HTTP_REFERER'}) {
foreach $ref (@http_ref) {
if ($ENV{'HTTP_REFERER'} =~ m#.*?://.*?$ref/.*#i) {
$match = 1;
last;
}
}
}
else {
$match = 0;
}
if ($ENV{'HTTP_REFERER'} && ($match == 0) ) {
error_url();
exit;
}
}
|