Hello Perl monks,
I was wondering, as a beginner, on how to make a Perl script that checks if the account and password match the stored values in the MySQL table so it will proceed? else, it won't proceed ?
#table l---------l----------l l_account_l_password_l l---------l----------l l__name___l___123____l l---------l----------l #form <form method="get" action="" onsubmit="return formValidation(this)"> Account: <input type="text" name="account"><br> Password: <input type="password" name="password"><br> <input type="submit" value="login" name="check"> #perl $account = param("account"); $password = param("password"); if($check) { $querycheck = $dbh->prepare("select * from data"); $querycheck->execute; if($account != "account" and $password != "password") { print "Login failed. Account and password do not match."; } return true; }
In reply to login authentication by window
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |