Hi,
»» if ($person=="abc" && $pwd =~"abc") { ok(); } else { error1(); exit; }
»» if ($person=="def" && $pwd =~"def") { ok(); } else { error1(); exit; }
Wenn du in Perl Strings vergleichen willst, benutze 'eq' statt '==' und 'ne' statt '!='.
Siehe Perl-Doku.
Gruß,
Slyh