programmiertechnik formularauswertung

[alex]

HI.

ich habe eine formularseite mit einer auswahlliste("leute") und einem passwortinput("pwd").
ich verarbeite alle daten mit perl:

#########CODE-Schnipsel

use CGI qw(:standard);

my $pwd= param("pwd");
my $person= param("leute");

check();

sub check
{
if ($person=="abc" && $pwd =~"abc") { ok(); } else { error1(); exit; }
if ($person=="def" && $pwd =~"def") { ok(); } else { error1(); exit; }

}

so sieht meine check routine aus, jedoch funzt die nur für "abc" richtig, "def" bekommt immer den error, wieso?

Alle meine versuche das passwort in verbindung mit der person zu bringen schlugen fehl, entweder funzt nur die erste if schleife, oder es funzt alles und auch das leere passwort. wenn ich dies wiederum versucht habe abzufangen funzt auf einmal kein passwort.
kann mir das einer erklären?