my $usr;
$usr = $dbh->prepare(q{SELECT user_id from user where user_id = ?});
$usr->execute($user_name);

if($user_name eq $usr)
{

#Do something here

}