my $sth = $dbh->prepare("SELECT MAX(M.Score) as score FROM Regions M");
  die "can't blah ..." unless $sth && $sth->execute();
  my $score = (($sth->fetchrow_hashref) || {})->{score};