Can't right now twist my brain to figure out
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 7 Apr 2002 16:59:45 +0000 (16:59 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 7 Apr 2002 16:59:45 +0000 (16:59 +0000)
the right CR/LF code point mappings in EBCDIC.

p4raw-id: //depot/perl@15787

lib/Pod/t/eol.t

index 89124ee..ea2c259 100644 (file)
@@ -1,5 +1,12 @@
 #!./perl -w
 
+BEGIN {
+    if (ord("A") == 193) {
+       print "1..0 \# Skip: EBCDIC\n";
+       exit(0);
+    }
+}
+
 use Test::More tests => 3;
 
 open(POD, ">$$.pod") or die "$$.pod: $!";