}
sub get_auxillary_parameters {
- my ($dbh) = @_;
-
- my %aux_parm_names = {
- -1 => num_iterations,
- -2 => score_stddev,
- -3 => rating_prior_stddev,
- -4 => total_log_likelihood,
- };
+ my ($dbh, $locale) = @_;
- my $q = $dbh->prepare('SELECT * FROM ratings WHERE id < 0');
- $q->execute;
+ my $q = $dbh->prepare('SELECT * FROM aux_params WHERE kultur=?');
+ $q->execute($locale);
my $aux_parms = {};
while (my $ref = $q->fetchrow_hashref) {
- my $id = $ref->{'id'};
- $aux_parms->{$aux_parm_names{$id}} = $ref->{'rating'};
+ $aux_parms->{$ref->{'id'}} = $ref->{'value'};
}
return $aux_parms;
}
+sub print_navbar {
+ my ($cgi, $dbh, $locale) = @_;
+ my $url = $cgi->url(-relative => 1);
+
+ print "<p style=\"font-size: smaller;\">";
+
+ my $q = $dbh->prepare('SELECT spraak, kultur FROM fotballspraak WHERE nyestesesong <> -1 ORDER BY id');
+ $q->execute;
+
+ my $first = 1;
+ while (my $ref = $q->fetchrow_hashref) {
+ if (!$first) {
+ print " :: ";
+ }
+ $first = 0;
+
+ if ($ref->{'kultur'} eq $locale) {
+ printf "%s ", $ref->{'spraak'};
+ } else {
+ printf "<a href=\"/%s/%s\">%s</a> ", $ref->{'kultur'}, $url, $ref->{'spraak'};
+ }
+ }
+ print "</p>\n";
+}
+
1;