X-Git-Url: http://lab.mitty.jp/git/?a=blobdiff_plain;f=misc%2Fpagetitle.pl;h=0027128d578e280186b2caf99c5b60a48f5f8782;hb=de9540b3b70a3084a0c894baa1399c84db76425e;hp=f3e790bc7c11c9157f5aa8d78ac86d540841f553;hpb=788f3dee979e65cd4aa61e6552cd1b45cf92a01f;p=lab.git

diff --git a/misc/pagetitle.pl b/misc/pagetitle.pl
index f3e790b..0027128 100755
--- a/misc/pagetitle.pl
+++ b/misc/pagetitle.pl
@@ -2,9 +2,10 @@
 
 use strict;
 use warnings;
-use encoding 'utf-8';
+use utf8;
 
 use LWP::Simple;
+binmode STDOUT => 'encoding(utf8)';
 
 my $file = shift @ARGV || exit;
 my $list;