append a session's history on shell exit and unlimited history list

[lab.git] / misc / pagetitle.pl

diff --git a/misc/pagetitle.pl b/misc/pagetitle.pl
index f3e790b..0027128 100755 (executable)
--- 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;