In dem speziellen Fall hätte es schon gelangt, wenn login_name => $login_name, mit der $cgi->param()-Zeile getauscht wäre. Dann wäre die "Hässlichkeit", dass Perl Schlüssel-Wert-Paare überschreibt zum Vorteil genutzt...