$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+)/) {
$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+)/) {