Help for this page
if (@username !=$usernameentered) { print "incorrect username entered @username\n"; }
if (@password !=$passwordentered) { print "incorrect password entered @password\n"; }