undef $val if ($val =~ /^\s*$/);
if ($p =~ /^score(\d+)-(\d+)/) {
+ if (defined($val) && ($val < 0 || $val > 10000)) {
+ ccbs::user_error("Alle poengsummer må være mellom 0 og 10000 (inklusive).");
+ }
+
$dbh->do('UPDATE scores SET score=? WHERE tournament=? AND round=? AND parallel=? AND player=? AND songnumber=?', undef,
$val, $tournament, $round, $group, $1, $2);
} elsif ($p =~ /^playmode(\d+)-(\d+)/) {