if (@username !=$usernameentered)
{
print "incorrect username entered @username\n";
}


##</code><code>##

if (@password !=$passwordentered)
{
print "incorrect password entered @password\n";
}