# Reference: http://www.w3.org/TR/REC-html40/sgml/entities.html
# Copyright 2005 Ævar Arnfjörð Bjarmason <avarab@gmail.com> No rights reserved
+use encoding 'utf8';
use strict;
-my $file = join /$\//, <>;
+my $file = join /\n/, <>;
$file =~ s/&#(\d+);/chr $1/eg;
$file =~ s/&#x([0-9a-fA-F]+);/chr hex $1/eg;