Use of uninitialized value...in concatenation (.) or string...

[Struppi]

habs jetzt so geschrieben bei der html ausgabe:
sub loginbox {
if (CGI::cookie("TFunLogin")){
($u, $p) = split(/|/,CGI::cookie("TFunLogin"));}
else
{
($u, $p) = ('unknow','');
}

Hatten wir doch alles schonmal :-(

my = $t = CGI::cookie("TFunLogin") || '';
my ($u, $p) = split /|/, $t;

Wenn du nicht undefinierte Werte haben willst:
my = $t = CGI::cookie("TFunLogin") || 'unknow|';
my ($u, $p) = split /|/, $t;

Struppi.