Index: misc/findcombinable.pl
===================================================================
--- misc/findcombinable.pl	(revision 1f4b1b52f4cf57a4661022c932e7bab3f642ab16)
+++ misc/findcombinable.pl	(revision 89fbc5de53910554c7167b12c82cab8c5eb2dce6)
@@ -4,5 +4,4 @@
 use warnings;
 use utf8;
-use encoding 'utf-8';
 
 use Unicode::Normalize qw(NFC NFKC);
Index: misc/findnonsjis.pl
===================================================================
--- misc/findnonsjis.pl	(revision 6f4fe5ee0a6f3874705227f25dcda010177e113b)
+++ misc/findnonsjis.pl	(revision 89fbc5de53910554c7167b12c82cab8c5eb2dce6)
@@ -4,5 +4,4 @@
 use warnings;
 use utf8;
-use encoding 'utf-8';
 
 use Encode;
Index: misc/pagetitle.pl
===================================================================
--- misc/pagetitle.pl	(revision 788f3dee979e65cd4aa61e6552cd1b45cf92a01f)
+++ misc/pagetitle.pl	(revision 89fbc5de53910554c7167b12c82cab8c5eb2dce6)
@@ -3,7 +3,8 @@
 use strict;
 use warnings;
-use encoding 'utf-8';
+use utf8;
 
 use LWP::Simple;
+binmode STDOUT => 'encoding(utf8)';
 
 my $file = shift @ARGV || exit;