- printf("%-10s - %-10s: %u - %u, new ratings %u/%u %u/%u [$likelihood]\n",
- $ref->{'username1'}, $ref->{'username2'}, $ref->{'score1'},
- $ref->{'score2'}, $newr1, $newrd1, $newr2, $newrd2);
- $dbh->do('insert into single_rating values (?,?,?,?,?)', undef,
- $ref->{'username1'}, $ref->{'gametime'}, $newr1, $newrd1, $newr1-$rating1);
- $dbh->do('insert into single_rating values (?,?,?,?,?)', undef,
- $ref->{'username2'}, $ref->{'gametime'}, $newr2, $newrd2, $newr2-$rating2);
+ unless ($dryrun) {
+ printf("%-10s - %-10s: %u - %u, new ratings %u/%u %u/%u [$likelihood]\n",
+ $ref->{'username1'}, $ref->{'username2'}, $ref->{'score1'},
+ $ref->{'score2'}, $newr1, $newrd1, $newr2, $newrd2);
+ $dbh->do('insert into single_rating values (?,?,?,?,?)', undef,
+ $ref->{'username1'}, $ref->{'gametime'}, $newr1, $newrd1, $newr1-$rating1);
+ $dbh->do('insert into single_rating values (?,?,?,?,?)', undef,
+ $ref->{'username2'}, $ref->{'gametime'}, $newr2, $newrd2, $newr2-$rating2);
+ }
$ratings{$ref->{'username1'}} = [ $newr1, $newrd1, $ref->{'eptime'} ];
$ratings{$ref->{'username2'}} = [ $newr2, $newrd2, $ref->{'eptime'} ];
}
$ratings{$ref->{'username1'}} = [ $newr1, $newrd1, $ref->{'eptime'} ];
$ratings{$ref->{'username2'}} = [ $newr2, $newrd2, $ref->{'eptime'} ];
}