Add list over tournaments.
[ccbs] / html / tournaments.pl
1 #! /usr/bin/perl
2
3 use ccbs;
4 use strict;
5 use warnings;
6
7 my $dbh = ccbs::db_connect();
8 my $tournaments = ccbs::db_fetch_all($dbh, 'SELECT * FROM tournaments');
9
10 ccbs::print_header();
11 ccbs::process_template('tournaments.tmpl', 'Turneringer', { tournaments => $tournaments });