my $scoringsystem = $cgi->param('scoringsystem');
if ($date !~ /^ ( \d{4} - \d\d - \d\d ) $/x) {
- die "Ugyldig dato (må være på YYYY-MM-DD)";
+ ccbs::user_error("Ugyldig dato (må være på formen YYYY-MM-DD).");
}
$dbh->do('INSERT INTO tournaments (season, tournamentname, country, location, date, machine, scoringsystem) VALUES (?,?,?,?,?,?,?)',