From c8cf970e335f870c5f14f2646b3fb6e70a85344f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se> Date: Fri, 11 Dec 2020 00:46:47 +0100 Subject: mht: Decode UTF-8 input ash: par: not found But this seems to be needed in order for UTF-8 input to work with HTML::Entities. --- mht | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/mht b/mht index adb8c36..39c7cff 100755 --- a/mht +++ b/mht @@ -3,6 +3,7 @@ use v5.12; use warnings; +use Encode qw/decode_utf8/; use HTML::Entities qw/encode_entities/; use Text::ParseWords qw/quotewords/; @@ -144,7 +145,7 @@ while (<>) { $empty .= "\n"; } else { print $empty; $empty = ''; - print encode_entities($_) . "\n"; + print encode_entities(decode_utf8($_)) . "\n"; } } -- cgit v1.2.3