X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=www%2Frating.pl;h=38768d4673ca281eec5062f8808859be04e52666;hb=36e32c3af61d19ee2b334c9586a2b68ce9d4e576;hp=5eb822807d1859b7b013c6f17960f83de2c2aacc;hpb=854c8eb6e0a3f9836043faaf2f43c05c190619fb;p=wloh diff --git a/www/rating.pl b/www/rating.pl index 5eb8228..38768d4 100755 --- a/www/rating.pl +++ b/www/rating.pl @@ -29,7 +29,7 @@ my $match_stddev = $aux_parms->{'score_stddev'} * sqrt(2.0); print CGI->header(-type=>'text/html; charset=utf-8', -expires=>'+5m'); POSIX::setlocale(&POSIX::LC_ALL, 'nb_NO.UTF-8'); -printf <<"EOF", $aux_parms->{'rating_prior_stddev'}, $match_stddev; +print <<"EOF"; {'rating_prior_stddev'}, $match_stddev; +EOF + +wloh_common::print_navbar($cgi, $dbh, $locale); + +printf <<"EOF", $aux_parms->{'rating_prior_stddev'}, $match_stddev;

WLoH-rating

Dette er et hobbyprosjekt fra tredjepart, og ikke en offisiell del av @@ -85,8 +90,8 @@ my $season = wloh_common::get_max_season($dbh, $locale); # Pick up all the subdivisions' ratings. my %subdivision_ratings = (); -my $q = $dbh->prepare('SELECT divisjon, avdeling, serie_id, AVG(rating) AS avg_rating FROM ratings NATURAL JOIN siste_divisjon WHERE sesong=? GROUP BY divisjon, avdeling, serie_id ORDER BY divisjon, avdeling'); -$q->execute($season); +my $q = $dbh->prepare('SELECT divisjon, avdeling, serie_id, AVG(rating) AS avg_rating FROM ratings NATURAL JOIN siste_divisjon NATURAL JOIN spiller_kultur WHERE kultur=? AND sesong=? GROUP BY divisjon, avdeling, serie_id ORDER BY divisjon, avdeling'); +$q->execute($locale, $season); while (my $ref = $q->fetchrow_hashref) { my $division = $ref->{'divisjon'};