In EBCDIC cannot test compile Net::Cmd without Convert::EBCDIC.

p4raw-id: //depot/perl@12761

diff --git a/t/lib/1_compile.t b/t/lib/1_compile.t
index d066994..f9df96b 100644 (file)
--- a/t/lib/1_compile.t
+++ b/t/lib/1_compile.t
@@ -92,6 +92,10 @@ unless (has_extension('NDBM_File')) {
 
 delete_by_prefix('unicode::');
 
+if (ord('A') == 193) {
+    delete_by_name('Net::Cmd') unless eval { require Convert::EBCDIC };
+}
+
 # Delete all modules which have their own tests.
 # This makes this test a lot faster.
 foreach my $mod (sort keys %Test) {