X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=html%2Fdo-add-player.pl;h=39b46f70d3c3c163bf9abc0d2edb0dcfd47a9728;hb=a317762dab2b775334cc85a43b6fe2e3c2097eab;hp=7817b14349b00207edc629e61ea6cd6b3e51f75b;hpb=e49c027eb9479fb64800142a53f5d5dfe0d290cf;p=ccbs diff --git a/html/do-add-player.pl b/html/do-add-player.pl index 7817b14..39b46f7 100755 --- a/html/do-add-player.pl +++ b/html/do-add-player.pl @@ -4,13 +4,19 @@ use ccbs; use strict; use warnings; +ccbs::admin_only(); + my $dbh = ccbs::db_connect(); my $cgi = new CGI; my $tournament = $cgi->param('tournament'); my $nick = $cgi->param('nick'); +my $country = $cgi->param('country'); +my $club = $cgi->param('club'); + +$club = undef if ($club == -1); -$dbh->do('INSERT INTO players (nick) VALUES (?)', undef, $nick); +$dbh->do('INSERT INTO players (nick, country, club) VALUES (?, ?, ?)', undef, $nick, $country, $club); my $ref = $dbh->selectrow_hashref('SELECT player FROM players WHERE nick=?', undef, $nick);