nicht angemeldet
Hallo,
bei meinem Script mach ich ne kleine PW-Abfrage (aber ohne crypt).
Hier der QT:
my %passwd = ("xxx","xxx");
my $u = $cgi->param('username');
my $p = $cgi->param('password');
if (($passwd{$u} eq $p) && ($u ne undef) && ($p ne undef))
Das ist soweit ganz gut geschrieben!
Außerdem benutzt Du einen Hash!!!
Aber sauberer schreibt man das wohl eher so(, oder?):
my %passwd = ("username" => "passwd");
Wenn Du dir angewöhnst, das mit Kommata zu trennen, wird es bei größeren Gebilden unüberschaubar.
Reiner