if ($dbh->selectrow_array(" select .... ") > 0) {
.....
}