fix for perlio.t failures on windows (from Dan Kogai)

p4raw-id: //depot/perl@19720

diff --git a/ext/Encode/t/perlio.t b/ext/Encode/t/perlio.t
index d3161cc..bc1ce1f 100644 (file)
--- a/ext/Encode/t/perlio.t
+++ b/ext/Encode/t/perlio.t
@@ -164,7 +164,7 @@ SKIP:{
        open  $fh, ">:encoding($utf_nobom)", $sfile or die "$sfile : $!";
        print $fh $str;
        close $fh;
-       open my $fh, "<:raw", $sfile or die "$sfile : $!";
+       open my $fh, "<", $sfile or die "$sfile : $!";
        read $fh, my $cmp, -s $sfile;
        close $fh;
        use bytes ();