html mit CGI aufrufen

[Ralf]

Hallo!

Du hast nirgends etwas ausgegeben, deshalb kannst Du auch nichts sehen. Versuchs mal so:

sub dopage {

$type = lc($_[0]);
local($prevpage, $nextpage);
if($type eq "login") {
open(PAGE, "<test/login/login.html");
} elsif($type eq "loginfail") {
open(PAGE, "<test/login/fail.html");
} elsif($type eq "index") {
open(PAGE, "<test/index/index.html");
}
print "Content-type: text/html\n\n";
read PAGE, my $page, -s PAGE or die "Kann Datei nicht lesen: $!";
close(page);
print $page;
return;
}

Gruss Markus

Hallo Marcus

das hatte ich auch schon, es bleibt aber auch weiss

Ralf