my $utf8 = HTML::Entities::decode($line); $utf8 = Encode::encode_utf8($utf8); my $proper = HTML::Entities::encode($utf8); print $proper;