This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
t/TEST: Test most of CPAN on EBCDIC
authorKarl Williamson <khw@cpan.org>
Wed, 2 Oct 2019 22:23:39 +0000 (16:23 -0600)
committerKarl Williamson <khw@cpan.org>
Sun, 6 Oct 2019 16:18:17 +0000 (10:18 -0600)
CPAN was mostly skipped before because so many distros raised errors,
but that is no longer true, so just skip about 10 that have big
problems, and test the rest

t/TEST

diff --git a/t/TEST b/t/TEST
index a9c844f..05cc065 100755 (executable)
--- a/t/TEST
+++ b/t/TEST
@@ -421,9 +421,23 @@ sub _tests_from_manifest {
                my $t = $1;
                my $extension = $2;
 
-               # XXX Generates way too many error lines currently.  Skip for
-               # v5.22
-               next if $t =~ /^cpan/ && ord("A") != 65;
+               next if ord "A" != 65
+                    && defined $extension
+                    && $extension =~ m! \b (?:
+                                               Archive-Tar/
+                                             | Config-Perl-V/
+                                             | CPAN-Meta/
+                                             | CPAN-Meta-YAML/
+                                             | Digest-SHA/
+                                             | ExtUtils-MakeMaker/
+                                             | HTTP-Tiny/
+                                             | IO-Compress/
+                                             | JSON-PP/
+                                             | libnet/
+                                             | MIME-Base64/
+                                             | podlators/
+                                           )
+                                      !x;
 
                if (!$::core || $t =~ m!^lib/[a-z]!) {
                    if (defined $extension) {