my %ratings_stddev = ();
my @matches = ();
-sub sanitize {
- return HTML::Entities::encode_entities(shift);
-}
-
sub color {
my $x = shift;
return int(255.0 * ($x ** (1.80)));
while (my $ref = $q->fetchrow_hashref) {
my $id = $ref->{'id'};
- $players{$id} = sanitize(Encode::decode_utf8($ref->{'navn'}));
+ $players{$id} = Encode::decode_utf8($ref->{'navn'});
$ratings{$id} = $ref->{'rating'};
$ratings_stddev{$id} = $ref->{'rating_stddev'};
}