X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/3655fed7bda87c3b62a6007efd73a8ce53214c18..dae3349befa4da12591930c4991283a48b63d223:/ext/PerlIO-encoding/t/encoding.t

diff --git a/ext/PerlIO-encoding/t/encoding.t b/ext/PerlIO-encoding/t/encoding.t
index fdd1f24..cba14a8 100644
--- a/ext/PerlIO-encoding/t/encoding.t
+++ b/ext/PerlIO-encoding/t/encoding.t
@@ -9,6 +9,10 @@ BEGIN {
 	print "1..0 # Skip: not Encode\n";
 	exit 0;
     }
+    if (ord("A") == 193) {
+	print "1..0 # Skip: EBCDIC\n";
+	exit 0;
+    }
     require "../../t/charset_tools.pl";
 }