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