  
  # MANIFEST itself is Unix style filenames, so we have to assume that Unix style
  # filenames will work.
+--- perl-5.24.1/t/thread_it.pl
++++ perl-5.24.1/t/thread_it.pl
+@@ -19,7 +19,7 @@
+ die "Can't figure out which test to run from filename '$caller'"
+     unless $caller =~ m!((?:op|re)/[-_a-z0-9A-Z]+)_thr\.t\z!;
+ 
+-my $file = "$1.t";
++my $file = "./$1.t";
+ 
+ $::running_as_thread = "running tests in a new thread";
+ require $file;
+--- perl-5.24.1/t/uni/upper.t
++++ perl-5.24.1/t/uni/upper.t
+@@ -4,7 +4,7 @@ BEGIN {
+       print("1..0 # miniperl: no Unicode::Normalize");
+       exit(0);
+     }
+-    require "uni/case.pl";
++    require "./uni/case.pl";
+ }
+ 
+ use feature 'unicode_strings';
 --- perl-5.24.1/h2pl/cbreak.pl	Sat Feb 18 19:05:35 2017
 +++ perl-5.24.1/h2pl/cbreak.pl	Sat Jan 14 13:52:22 2017
 @@ -12,7 +12,7 @@

 '
 for f in $dynamic_ext; do
     : the dependency named here will never exist

 
 my $MASTER_CFG = "config_h.SH";
 # Inclusive bounds on the main part of the file, $section == 1 below:
--- perl-5.24.1/Porting/cmpVERSION.pl
+++ perl-5.24.1/Porting/cmpVERSION.pl
@@ -83,6 +83,7 @@
 @skip{
     'cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Setup/BFD.pm', # just a test module
     'cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Setup/XS.pm',  # just a test module
+    'cpan/IO-Compress/lib/File/GlobMapper.pm', # upstream needs to supply $VERSION
     'cpan/Math-BigInt/t/Math/BigFloat/Subclass.pm', # just a test module
     'cpan/Math-BigInt/t/Math/BigInt/BareCalc.pm',   # just a test module
     'cpan/Math-BigInt/t/Math/BigInt/Scalar.pm',     # just a test module
--- perl-5.24.1/Porting/corelist.pl
+++ perl-5.24.1/Porting/corelist.pl
@@ -99,7 +99,7 @@ find(
         /(\.pm|_pm\.PL)$/ or return;
         /PPPort\.pm$/ and return;
         my $module = $File::Find::name;
-        $module =~ /\b(demo|t|private)\b/ and return;    # demo or test modules
+        $module =~ /\b(demo|t|private|corpus)\b/ and return;    # demo or test modules
         my $version = MM->parse_version($_);
         defined $version or $version = 'undef';
         $version =~ /\d/ and $version = "'$version'";
--- perl-5.24.1/Porting/makemeta
+++ perl-5.24.1/Porting/makemeta
@@ -61,7 +61,7 @@
 
 BEGIN {
     # Get function prototypes
-    require 'regen/regen_lib.pl';
+    require './regen/regen_lib.pl';
 }
 
 use Maintainers qw(%Modules get_module_files get_module_pat);
--- perl-5.24.1/Porting/new-perldelta.pl	Sat Feb 18 19:05:52 2017
+++ perl-5.24.1/Porting/new-perldelta.pl	Sat Jan 14 13:51:21 2017
@@ -4,7 +4,7 @@
