my $doit = param('login');

##</code><code>##

my $doit = $ENV{REQUEST_METHOD} eq 'POST';