nicht angemeldet
Moin!
(again)
Wenn nicht gestern, dann heute, was? Jetzt habe ich erstmal gesehen, dass das ja ziemlicher Quatsch ist, was in dem Script steht. Naja, ich hab's jetzt mal nicht gleich neu geschrieben, weil mir da die Lust fehlt, aber habe mal das wichtigste geaendert:
Zeile 26 alt:
$url_path = "http://www.mydomain.com/error";
neu:
$errordocs_path = "/yourpath-to-your-errordocs";
Zeile 78ff alt:
print "Status: 301 Found\n";
print "Location: $url_path/$code_page \n\n";
neu:
{
local *ERRDOC;
if (open(ERRDOC, "<$errordocs_path/$code_page")) {
my $errdoc;
local $/; undef $/;
$errdoc = <ERRDOC>;
close(ERRDOC);
print "Status: $ENV{'QUERY_STRING'} $code\n";
print "Content-type: text/html\n\n";
print $errdoc;
} else {
print "Status: 500 Internal Server Error\n";
print "Content-type: text/html\n\n";
print qq~<HTML><HEAD><TITLE>500 Internal Server Error</TITLE></HEAD>
<BODY>Processing your request could not be completed due to the error <I>$ENV{'QUERY_STRING'} - $code</I>.<BR>
Additionally, an internal server error occurred while generating an approriate error document.<BR>
~
}
}
Ist nicht getestet, aber das kriegt Oliver sicher alleine hin. *g*
So long