Redirect auf HTML-Seite

[Hanno Müller]

Was muß ich in Perl schreiben um z.B. einen Redirect auf
www.domain.com/error/error404.html
zu setzen ?

Zwei Möglichkeiten.

#!/usr/bin/perl

Umleitung

$url = "http://www.domain.com/error/error404.html";

print <<UMLEITUNG
Location: $url
Content-type: text/html

Hier sind Sie falsch.<p>
Versuchen Sie es doch mal <a href="$url">hier</a>.<p>
UMLEITUNG

Ende

Oder die zweite Möglichkeit:

#!/usr/bin/perl

Ausgabe der Datei

print "Content-type: text/html\n\n;

open(DATEI, "/hier/der/pfad/zur/datei/error404.html");
while (<DATEI>) {
print $_;
}
close(DATEI);

Ende

Die 2. Möglichkeit ist zu bevorzugen, weil dann der Browser nicht umgeleitet wird. Die fehlerhafte URL bleibt also im Adress-Feld stehen und kann korrigiert werden.