X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=www%2Findex.pl;h=a4c16fd949c74e63e3e2afeb5e12295c2901f12d;hb=c69d85040be1d4a1d3b1293f7fe1777cd3085cb6;hp=ecac609acdef31d01988f3e9edb7b7224bcf5b06;hpb=857cc32e56d1300592f7b285fca6b0c4b9381a2f;p=wloh diff --git a/www/index.pl b/www/index.pl index ecac609..a4c16fd 100755 --- a/www/index.pl +++ b/www/index.pl @@ -7,6 +7,8 @@ use CGI::Carp qw( fatalsToBrowser ); use DBI; use POSIX; use Devel::Peek; +use HTML::Entities; +use Encode; use locale; require '../config.pm'; @@ -28,9 +30,7 @@ my %parms = (); my $match_stddev; sub sanitize { - $_ = shift; - y/ \t\n<>&/_/; - return $_; + return HTML::Entities::encode_entities(shift); } sub color { @@ -262,7 +262,7 @@ $q->execute($season, $division, $subdivision); while (my $ref = $q->fetchrow_hashref) { my $id = $ref->{'id'}; - $players{$id} = sanitize($ref->{'navn'}); + $players{$id} = sanitize(Encode::decode_utf8($ref->{'navn'})); $ratings{$id} = $ref->{'rating'}; } $q->finish;