if (($dbh->selectcol_arrayref($sql, undef, $username, my_crypt_call($password))->[0] == 1)