X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=train.pl;h=22a2741ccb8b12a71a81d1d9c065461cc4f00dd3;hb=1e27ce64b3bd8574c621f1b7d47f94593d99318b;hp=e55f37c307f8489db4c75673af2c1158dcbbb4c9;hpb=cc6db55bd631c825d01f16bac62181ff45e41785;p=wloh diff --git a/train.pl b/train.pl index e55f37c..22a2741 100755 --- a/train.pl +++ b/train.pl @@ -49,6 +49,7 @@ $q->execute($last_season); while (my $ref = $q->fetchrow_hashref) { next if ($ref->{'maalfor'} == 150 && $ref->{'maalmot'} == 0); next if ($ref->{'maalfor'} == 0 && $ref->{'maalmot'} == 150); + next if ($ref->{'maalfor'} == 150 && $ref->{'maalmot'} == 150); printf DATA "%d %d %d %d %f\n", $ref->{'p1'}, $ref->{'p2'}, $ref->{'maalfor'}, $ref->{'maalmot'}, $ref->{'vekt'}; } @@ -57,7 +58,7 @@ close DATA; $dbh->do('DELETE FROM ratings'); my $iq = $dbh->prepare('INSERT INTO ratings ( id, rating ) VALUES (?, ?)'); -open RATINGS, "/home/sesse/dev/bayeswf/bayeswf < $tmpnam |" +open RATINGS, "$config::base_dir/bayeswf < $tmpnam |" or die "bayeswf: $!"; while () { /(.*) (.*)/ or next;