hi nochmal,
ich habe nun die Lösung des problems gefunden.
Das problem lag schon indirekt am split,aber auch daran,
dass bei der html ausgabe($u, $p) = split(/|/,.......
etwas noch nicht existierte,nähmlich das cookie.
wenn kein cookie da ist,kann er auch nichts spliten,dasselbe mit $u und $p,welches ausgegeben werden sollte,falls es cookie gibt.
habs jetzt so geschrieben bei der html ausgabe:
sub loginbox {
if (CGI::cookie("TFunLogin")){
($u, $p) = split(/|/,CGI::cookie("TFunLogin"));}
else
{
($u, $p) = ('unknow','');
}
print "Content-type: text/html\n\n";
print "<html><head><title> - access denied - </title>
</head>........etc.
Grüsse
Alain
nicht angemeldet