Train one model (with its own aux parms) per locale.

[wloh] / common.pm

diff --git a/common.pm b/common.pm
index ee38a63937535acbcb112f0fa67a07967e10d722..a5c730b806f3d0bda20e511bda9e77be7e8d2cf8 100644 (file)
--- a/common.pm
+++ b/common.pm
@@ -30,22 +30,14 @@ sub get_locale {
 }
 
 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;
 }