if ($dbh->selectrow_array("select count(*....") < 1) {
   #hier greift ein anderer prozess zu
   $dbh->do(...)
}