mht: Encode HTML entities

1 files changed, 2 insertions, 1 deletions

diff --git a/mht b/mht
index 2a93b26..2e75d44 100755
--- a/mht
+++ b/mht
@@ -3,6 +3,7 @@
 use v5.12;
 use warnings;
 
+use HTML::Entities qw/encode_entities/;
 use Text::ParseWords qw/quotewords/;
 
 
@@ -161,7 +162,7 @@ while (<>) {
 		$empty .= "\n";
 	} else {
 		print $empty; $empty = '';
-		print "$_\n";
+		print encode_entities($_) . "\n";
 	}
 }