Hallo CK,
my $username = CGI::param('username')||'';
my $password = CGI::param('password')||'';
my $query = new CGI;
my $names = $query->param||'99';Das ist auch nicht nötig.
CGI.pm erstellt im Falle eines direkten Zugriffs von selbst ein
(internes) Objekt.
dann wäre also my $names = CGI::param()||'99';
doch besser anstatt
my $names = CGI::param();
weil man dann den vergleich $names != 2 nicht machen kann im zweiten fall,
da perl dann ein fehler erzeugt "Use of uninitialized value in numeric..."
my $names = scalar CGI::param();
Nicht noetig. Da $names ein Skalar ist, ist der Kontext _kein_
Listen-Kontext. Da kannst du das scalar auch weglassen.
Grüsse
Alain