[vana]

I have a file that I am checking the contents of to match username that is input into a form. If there is a match, a welcome message should be displayed. If not, then an error message. The first part works, but if I enter a bogus username, it still gives the welcome message, but using the last record in my file. Am I missing a line of code or something?

[FiRe]

Code:

#!/usr/bin/perl
use CGI;
print "Content-type: text/html\n\n";

$cgi = new CGI;
$user = $cgi->param('username');

#code to get original username
$original_user = "whatever";

if ($user eq $original_user) {
print "Good!";
}
else {
print "Bad!";
}