Help for this page
#!/usr/bin/perl ... } # print the form...
my $select = $dbh->prepare("select email,password from users where u +sername=?"); $select->execute( $username ); ... } else { #login was okay, so redirect... }