Update 04_print.t

Fix Test failure on 5.18.4.
twata1 · Mar 12, 2017 · a6d6cd3 · a6d6cd3
1 parent c38abd2
commit a6d6cd3
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/t/04_print.t b/t/04_print.t
@@ -7,6 +7,11 @@ use Test::Output;
 use Win32::Unicode;
 use File::Spec;
 
+BEGIN {
+    binmode STDOUT, ':encoding(utf8)';
+    binmode STDERR, ':encoding(utf8)';
+}
+
 open STDERR, '>', File::Spec->devnull or die $!;
 
 my $str = " I \x{2665} Perl";