This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update ExtUtils-MakeMaker to CPAN version 7.48
authorTodd Rinaldo <toddr@cpan.org>
Mon, 5 Oct 2020 19:40:53 +0000 (14:40 -0500)
committerTodd Rinaldo <toddr@cpan.org>
Tue, 6 Oct 2020 19:37:32 +0000 (14:37 -0500)
[DELTA]

7.48    Sun  4 Oct 11:39:22 BST 2020

    No changes since v7.47_12

7.47_12 Wed 30 Sep 16:19:25 BST 2020

    Bug fixes:
    - Make Mkbootstrap.pm strict

    Test fixes:
    - Skip the failing dynamic vs static tests on Win32

7.47_11 Sun 20 Sep 10:02:15 BST 2020

    Enhancements:
    - Hint file loading returned to using eval() as documented

7.47_10 Tue 15 Sep 19:30:32 BST 2020

    Test fixes:
    - BareV2String should also be skipped on v5.8.0

7.47_09 Mon 14 Sep 14:33:52 BST 2020

    Bug fixes:
    - Removed duplicated NOOP on pure_all

    Test fixes:
    - Remove tests for invalid version declarations
    - Make windows specific code for NoXS compile under strict

7.47_08 Mon 31 Aug 09:43:01 BST 2020

    Test fixes:
    - Resolved race conditions so the whole testsuite
      can be run in parallel safely again

    QA Fixes:
    - Added github action for Strawberry Perl
    - Added github action for Ubuntu/Linux

7.47_07 Mon  3 Aug 22:34:08 BST 2020

    Bug fixes:
    - Ensure all modules have 'use warnings'
    - Resolve revealed problems with warnings

    Test fixes:
    - Ensure all tests have strict and warnings
    - Resolve revealed problems with strict and warnings

7.47_06 Sat  1 Aug 14:36:00 BST 2020

    Bug fixes:
    - Refine archname to use abi_version and abi_revision

7.47_05 Fri 31 Jul 10:35:54 BST 2020

    Bug fixes:
    - use $^V instead of PERL_VERSION after Perl 5.10

7.47_04 Tue 28 Jul 19:34:00 BST 2020

    Test fixes:
    - Skip static tests on AIX and z/OS when in
      core

    QA fixes:
    - Added v5.30 and v5.32 to travis build

7.47_03 Wed  8 Jul 21:58:29 BST 2020

    Test fixes:
    - Correct skip count in MM_Cygwin.t

7.47_02 Tue  7 Jul 01:40:13 BST 2020

    OS390 Enhancements:
    - Added MM subclass for OS390
    - Override xs_make_dynamic_lib() for os390

7.47_01 Fri 26 Jun 10:55:42 BST 2020

    Bug fixes:
    - Sanitise provided VERSION and VERSION_FROM
      ( RT#132875 )

7.46  Tue 23 Jun 10:19:40 BST 2020

    No changes since v7.45_01

7.45_01 Thu 28 May 17:29:45 BST 2020

    Bug fixes:
    - Always link to $Config{libs} on cygwin

    Test fixes:
    - Fix testing how some versions should be parsed

    QA fixes:
    - Add libnsl-devel to Cygwin packages we need

100 files changed:
MANIFEST
Porting/Maintainers.pl
cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/Command/MM.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist/Kid.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_AIX.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_BeOS.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Cygwin.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Darwin.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS390.pm [new file with mode: 0644]
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VOS.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win32.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Win95.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MY.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Config.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/FAQ.pod
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Locale.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/Tutorial.pod
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/version.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker/version/regex.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mkbootstrap.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/Mksymlists.pm
cpan/ExtUtils-MakeMaker/lib/ExtUtils/testlib.pm
cpan/ExtUtils-MakeMaker/t/00compile.t
cpan/ExtUtils-MakeMaker/t/03-xsstatic.t
cpan/ExtUtils-MakeMaker/t/FIRST_MAKEFILE.t
cpan/ExtUtils-MakeMaker/t/INST.t
cpan/ExtUtils-MakeMaker/t/INSTALL_BASE.t
cpan/ExtUtils-MakeMaker/t/INST_PREFIX.t
cpan/ExtUtils-MakeMaker/t/Liblist.t
cpan/ExtUtils-MakeMaker/t/MM_Any.t
cpan/ExtUtils-MakeMaker/t/MM_BeOS.t
cpan/ExtUtils-MakeMaker/t/MM_Cygwin.t
cpan/ExtUtils-MakeMaker/t/MM_NW5.t
cpan/ExtUtils-MakeMaker/t/MM_OS2.t
cpan/ExtUtils-MakeMaker/t/MM_Unix.t
cpan/ExtUtils-MakeMaker/t/MM_VMS.t
cpan/ExtUtils-MakeMaker/t/MM_Win32.t
cpan/ExtUtils-MakeMaker/t/Mkbootstrap.t
cpan/ExtUtils-MakeMaker/t/VERSION_FROM.t
cpan/ExtUtils-MakeMaker/t/WriteEmptyMakefile.t
cpan/ExtUtils-MakeMaker/t/arch_check.t
cpan/ExtUtils-MakeMaker/t/backwards.t
cpan/ExtUtils-MakeMaker/t/basic.t
cpan/ExtUtils-MakeMaker/t/build_man.t
cpan/ExtUtils-MakeMaker/t/cd.t
cpan/ExtUtils-MakeMaker/t/config.t
cpan/ExtUtils-MakeMaker/t/cp.t
cpan/ExtUtils-MakeMaker/t/dir_target.t
cpan/ExtUtils-MakeMaker/t/eu_command.t
cpan/ExtUtils-MakeMaker/t/fix_libs.t
cpan/ExtUtils-MakeMaker/t/fixin.t
cpan/ExtUtils-MakeMaker/t/hints.t
cpan/ExtUtils-MakeMaker/t/is_of_type.t
cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/NoXS.pm
cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Setup/BFD.pm
cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Setup/XS.pm
cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm
cpan/ExtUtils-MakeMaker/t/lib/TieIn.pm
cpan/ExtUtils-MakeMaker/t/lib/TieOut.pm
cpan/ExtUtils-MakeMaker/t/make.t
cpan/ExtUtils-MakeMaker/t/maketext_filter.t
cpan/ExtUtils-MakeMaker/t/metafile_data.t
cpan/ExtUtils-MakeMaker/t/metafile_file.t
cpan/ExtUtils-MakeMaker/t/miniperl.t
cpan/ExtUtils-MakeMaker/t/oneliner.t
cpan/ExtUtils-MakeMaker/t/os_unsupported.t
cpan/ExtUtils-MakeMaker/t/parse_version.t
cpan/ExtUtils-MakeMaker/t/pm.t
cpan/ExtUtils-MakeMaker/t/pm_to_blib.t
cpan/ExtUtils-MakeMaker/t/pod2man.t
cpan/ExtUtils-MakeMaker/t/postamble.t
cpan/ExtUtils-MakeMaker/t/prefixify.t
cpan/ExtUtils-MakeMaker/t/prereq.t
cpan/ExtUtils-MakeMaker/t/prereq_print.t
cpan/ExtUtils-MakeMaker/t/problems.t
cpan/ExtUtils-MakeMaker/t/prompt.t
cpan/ExtUtils-MakeMaker/t/revision.t
cpan/ExtUtils-MakeMaker/t/several_authors.t
cpan/ExtUtils-MakeMaker/t/split_command.t
cpan/ExtUtils-MakeMaker/t/test_boilerplate.t
cpan/ExtUtils-MakeMaker/t/testlib.t
cpan/ExtUtils-MakeMaker/t/testrules.yml [deleted file]
cpan/ExtUtils-MakeMaker/t/unicode.t
cpan/ExtUtils-MakeMaker/t/vstrings.t
cpan/ExtUtils-MakeMaker/t/writemakefile_args.t
lib/.gitignore
t/porting/customized.dat

index 7e2231f..f863f10 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -788,6 +788,7 @@ cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_DOS.pm                      MakeMaker methods for DOS
 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_MacOS.pm               MakeMaker methods for MacOS
 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_NW5.pm                 MakeMaker methods for NetWare
 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS2.pm                 MakeMaker methods for OS/2
+cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS390.pm
 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_QNX.pm                 MakeMaker methods for QNX
 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm                        MakeMaker methods for Unix
 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_UWIN.pm                        MakeMaker methods for U/WIN
@@ -869,7 +870,6 @@ cpan/ExtUtils-MakeMaker/t/test_boilerplate.t                        MakeMaker test
 cpan/ExtUtils-MakeMaker/t/testdata/reallylongdirectoryname/arch1/Config.pm     test data for MakeMaker
 cpan/ExtUtils-MakeMaker/t/testdata/reallylongdirectoryname/arch2/Config.pm     test data for MakeMaker
 cpan/ExtUtils-MakeMaker/t/testlib.t                            See if ExtUtils::testlib works
-cpan/ExtUtils-MakeMaker/t/testrules.yml
 cpan/ExtUtils-MakeMaker/t/unicode.t
 cpan/ExtUtils-MakeMaker/t/VERSION_FROM.t                       See if MakeMaker's VERSION_FROM works
 cpan/ExtUtils-MakeMaker/t/vstrings.t
index 7d13f0f..1d68abf 100755 (executable)
@@ -471,7 +471,7 @@ use File::Glob qw(:case);
     },
 
     'ExtUtils::MakeMaker' => {
-        'DISTRIBUTION' => 'BINGOS/ExtUtils-MakeMaker-7.44.tar.gz',
+        'DISTRIBUTION' => 'BINGOS/ExtUtils-MakeMaker-7.48.tar.gz',
         'FILES'        => q[cpan/ExtUtils-MakeMaker],
         'EXCLUDED'     => [
             qr{^t/lib/Test/},
@@ -483,11 +483,6 @@ use File::Glob qw(:case);
             'README.packaging',
             'lib/ExtUtils/MakeMaker/version/vpp.pm',
         ],
-        'CUSTOMIZED' => [
-            # https://github.com/Perl/perl5/issues/17601
-            # https://rt.cpan.org/Ticket/Display.html?id=115321
-            't/lib/MakeMaker/Test/Setup/XS.pm',
-        ],
     },
 
        'ExtUtils::PL2Bat' => {
index c5101c3..71746af 100644 (file)
@@ -2,12 +2,13 @@ package ExtUtils::Command;
 
 use 5.00503;
 use strict;
+use warnings;
 require Exporter;
 use vars qw(@ISA @EXPORT @EXPORT_OK $VERSION);
 @ISA       = qw(Exporter);
 @EXPORT    = qw(cp rm_f rm_rf mv cat eqtime mkpath touch test_f test_d chmod
                 dos2unix);
-$VERSION = '7.44';
+$VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 my $Is_VMS   = $^O eq 'VMS';
index 484fa5b..d5658e3 100644 (file)
@@ -10,7 +10,7 @@ our @ISA = qw(Exporter);
 
 our @EXPORT  = qw(test_harness pod2man perllocal_install uninstall
                   warn_if_old_packlist test_s cp_nonempty);
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 my $Is_VMS = $^O eq 'VMS';
index deec54d..168d3d2 100644 (file)
@@ -1,8 +1,9 @@
 package ExtUtils::Liblist;
 
 use strict;
+use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 use File::Spec;
index 65b42fe..c10a789 100644 (file)
@@ -11,7 +11,7 @@ use 5.006;
 
 use strict;
 use warnings;
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 use ExtUtils::MakeMaker::Config;
index f1ffa91..32dff4b 100644 (file)
@@ -1,9 +1,10 @@
 package ExtUtils::MM;
 
 use strict;
+use warnings;
 use ExtUtils::MakeMaker::Config;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::Liblist;
@@ -70,6 +71,7 @@ $Is{VOS}    = $^O eq 'vos';
 $Is{QNX}    = $^O eq 'qnx';
 $Is{AIX}    = $^O eq 'aix';
 $Is{Darwin} = $^O eq 'darwin';
+$Is{OS390}  = $^O eq 'os390';
 
 $Is{Unix}   = !grep { $_ } values %Is;
 
index 654e221..de9ba6e 100644 (file)
@@ -1,7 +1,8 @@
 package ExtUtils::MM_AIX;
 
 use strict;
-our $VERSION = '7.44';
+use warnings;
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 use ExtUtils::MakeMaker::Config;
index 4f4b252..16b706a 100644 (file)
@@ -1,7 +1,8 @@
 package ExtUtils::MM_Any;
 
 use strict;
-our $VERSION = '7.44';
+use warnings;
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 use Carp;
@@ -1670,7 +1671,7 @@ sub _mymeta_from_meta {
     # rolled their own tarball rather than using "make dist".
     if ($meta->{generated_by} &&
         $meta->{generated_by} =~ /ExtUtils::MakeMaker version ([\d\._]+)/) {
-        my $eummv = do { local $^W = 0; $1+0; };
+        my $eummv = do { no warnings; $1+0; };
         if ($eummv < 6.2501) {
             return;
         }
index d62a7d1..d0af6fc 100644 (file)
@@ -1,6 +1,7 @@
 package ExtUtils::MM_BeOS;
 
 use strict;
+use warnings;
 
 =head1 NAME
 
@@ -26,7 +27,7 @@ require ExtUtils::MM_Any;
 require ExtUtils::MM_Unix;
 
 our @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix );
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 
index 2052c7c..208aa7a 100644 (file)
@@ -1,6 +1,7 @@
 package ExtUtils::MM_Cygwin;
 
 use strict;
+use warnings;
 
 use ExtUtils::MakeMaker::Config;
 use File::Spec;
@@ -9,7 +10,7 @@ require ExtUtils::MM_Unix;
 require ExtUtils::MM_Win32;
 our @ISA = qw( ExtUtils::MM_Unix );
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 
@@ -100,6 +101,16 @@ sub init_linker {
     $self->{EXPORT_LIST}  ||= '';
 }
 
+sub init_others {
+    my $self = shift;
+
+    $self->SUPER::init_others;
+
+    $self->{LDLOADLIBS} ||= $Config{perllibs};
+
+    return;
+}
+
 =item maybe_command
 
 Determine whether a file is native to Cygwin by checking whether it
index d5c66de..2890930 100644 (file)
@@ -1,8 +1,9 @@
 package ExtUtils::MM_DOS;
 
 use strict;
+use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Any;
index 9ca9d2c..2cd2321 100644 (file)
@@ -1,13 +1,14 @@
 package ExtUtils::MM_Darwin;
 
 use strict;
+use warnings;
 
 BEGIN {
     require ExtUtils::MM_Unix;
     our @ISA = qw( ExtUtils::MM_Unix );
 }
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 
index b10e3f9..2dc3585 100644 (file)
@@ -1,8 +1,9 @@
 package ExtUtils::MM_MacOS;
 
 use strict;
+use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 sub new {
index a9e2e1a..2a1dc81 100644 (file)
@@ -19,10 +19,11 @@ the semantics.
 =cut
 
 use strict;
+use warnings;
 use ExtUtils::MakeMaker::Config;
 use File::Basename;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Win32;
index 300f091..b775196 100644 (file)
@@ -1,11 +1,12 @@
 package ExtUtils::MM_OS2;
 
 use strict;
+use warnings;
 
 use ExtUtils::MakeMaker qw(neatvalue);
 use File::Spec;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Any;
diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS390.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_OS390.pm
new file mode 100644 (file)
index 0000000..ac0156c
--- /dev/null
@@ -0,0 +1,86 @@
+package ExtUtils::MM_OS390;
+
+use strict;
+use warnings;
+our $VERSION = '7.48';
+$VERSION =~ tr/_//d;
+
+use ExtUtils::MakeMaker::Config;
+require ExtUtils::MM_Unix;
+our @ISA = qw(ExtUtils::MM_Unix);
+
+=head1 NAME
+
+ExtUtils::MM_OS390 - OS390 specific subclass of ExtUtils::MM_Unix
+
+=head1 SYNOPSIS
+
+  Don't use this module directly.
+  Use ExtUtils::MM and let it choose.
+
+=head1 DESCRIPTION
+
+This is a subclass of L<ExtUtils::MM_Unix> which contains functionality for
+OS390.
+
+Unless otherwise stated it works just like ExtUtils::MM_Unix.
+
+=head2 Overriden methods
+
+=over
+
+=item xs_make_dynamic_lib
+
+Defines the recipes for the C<dynamic_lib> section.
+
+=cut
+
+sub xs_make_dynamic_lib {
+    my ($self, $attribs, $object, $to, $todir, $ldfrom, $exportlist, $dlsyms) = @_;
+    $exportlist = '' if $exportlist ne '$(EXPORT_LIST)';
+    my $armaybe = $self->_xs_armaybe($attribs);
+    my @m = sprintf '%s : %s $(MYEXTLIB) %s$(DFSEP).exists %s $(PERL_ARCHIVEDEP) $(PERL_ARCHIVE_AFTER) $(INST_DYNAMIC_DEP) %s'."\n", $to, $object, $todir, $exportlist, ($dlsyms || '');
+    my $dlsyms_arg = $self->xs_dlsyms_arg($dlsyms);
+    if ($armaybe ne ':'){
+        $ldfrom = 'tmp$(LIB_EXT)';
+        push(@m,"      \$(ARMAYBE) cr $ldfrom $object\n");
+        push(@m,"      \$(RANLIB) $ldfrom\n");
+    }
+
+    # For example in AIX the shared objects/libraries from previous builds
+    # linger quite a while in the shared dynalinker cache even when nobody
+    # is using them.  This is painful if one for instance tries to restart
+    # a failed build because the link command will fail unnecessarily 'cos
+    # the shared object/library is 'busy'.
+    push(@m,"  \$(RM_F) \$\@\n");
+
+    my $libs = '$(LDLOADLIBS)';
+
+    my $ld_run_path_shell = "";
+    if ($self->{LD_RUN_PATH} ne "") {
+        $ld_run_path_shell = 'LD_RUN_PATH="$(LD_RUN_PATH)" ';
+    }
+
+    push @m, sprintf <<'MAKE', $ld_run_path_shell, $dlsyms_arg, $self->xs_obj_opt('$@'), $ldfrom, $libs, $exportlist;
+       %s$(LD) $(LDDLFLAGS) %s $(OTHERLDFLAGS) %s $(MYEXTLIB) %s \
+         $(PERL_ARCHIVE) %s $(PERL_ARCHIVE_AFTER) %s \
+         $(INST_DYNAMIC_FIX)
+       $(CHMOD) $(PERM_RWX) $@
+MAKE
+    join '', @m;
+}
+
+1;
+
+=back
+
+=head1 AUTHOR
+
+Michael G Schwern <schwern@pobox.com> with code from ExtUtils::MM_Unix
+
+=head1 SEE ALSO
+
+L<ExtUtils::MakeMaker>
+
+=cut
+__END__
index 3e6f6d0..fc74b66 100644 (file)
@@ -1,7 +1,8 @@
 package ExtUtils::MM_QNX;
 
 use strict;
-our $VERSION = '7.44';
+use warnings;
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Unix;
index 4201585..db1ecd6 100644 (file)
@@ -1,7 +1,8 @@
 package ExtUtils::MM_UWIN;
 
 use strict;
-our $VERSION = '7.44';
+use warnings;
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Unix;
index ce12927..c2d5dfb 100644 (file)
@@ -3,6 +3,7 @@ package ExtUtils::MM_Unix;
 require 5.006;
 
 use strict;
+use warnings;
 
 use Carp;
 use ExtUtils::MakeMaker::Config;
@@ -14,7 +15,7 @@ use ExtUtils::MakeMaker qw($Verbose neatvalue _sprintf562);
 
 # If we make $VERSION an our variable parse_version() breaks
 use vars qw($VERSION);
-$VERSION = '7.44';
+$VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Any;
@@ -3000,7 +3001,7 @@ sub parse_version {
         chop;
         next if /^\s*(if|unless|elsif)/;
         if ( m{^ \s* package \s+ \w[\w\:\']* \s+ (v?[0-9._]+) \s* (;|\{)  }x ) {
-            local $^W = 0;
+            no warnings;
             $result = $1;
         }
         elsif ( m{(?<!\\) ([\$*]) (([\w\:\']*) \bVERSION)\b .* (?<![<>=!])\=[^=]}x ) {
@@ -3018,6 +3019,10 @@ sub parse_version {
       my $normal = eval { version->new( $result ) };
       $result = $normal if defined $normal;
     }
+    if ( defined $result ) {
+      $result = "undef" unless $result =~ m!^v?[\d_\.\-]+$!
+                        or eval { version->parse( $result ) };
+    }
     $result = "undef" unless defined $result;
     return $result;
 }
@@ -3033,8 +3038,8 @@ sub get_version {
             version::->import;
         };
         no strict;
+        no warnings;
         local *{$name};
-        local $^W = 0;
         $line = $1 if $line =~ m{^(.+)}s;
         eval($line); ## no critic
         return ${$name};
@@ -3232,11 +3237,12 @@ PPD_PERLVERS
     }
 
     my $archname = $Config{archname};
+
+    # archname did not change from 5.6 to 5.8, but those versions may
+    # not be not binary compatible so now we append the part of the
+    # version that changes when binary compatibility may change
     if ("$]" >= 5.008) {
-        # archname did not change from 5.6 to 5.8, but those versions may
-        # not be not binary compatible so now we append the part of the
-        # version that changes when binary compatibility may change
-        $archname .= "-$Config{PERL_REVISION}.$Config{PERL_VERSION}";
+        $archname .= "-$Config{api_revision}.$Config{api_version}";
     }
     push @ppd_chunks, sprintf <<'PPD_OUT', $archname;
         <ARCHITECTURE NAME="%s" />
@@ -3973,8 +3979,6 @@ sub top_targets {
 pure_all :: config pm_to_blib subdirs linkext
        $(NOECHO) $(NOOP)
 
-       $(NOECHO) $(NOOP)
-
 subdirs :: $(MYEXTLIB)
        $(NOECHO) $(NOOP)
 
index fbf5f9e..fc9eba4 100644 (file)
@@ -1,6 +1,7 @@
 package ExtUtils::MM_VMS;
 
 use strict;
+use warnings;
 
 use ExtUtils::MakeMaker::Config;
 require Exporter;
@@ -15,7 +16,7 @@ BEGIN {
 
 use File::Basename;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Any;
index dea49e1..b188296 100644 (file)
@@ -1,7 +1,8 @@
 package ExtUtils::MM_VOS;
 
 use strict;
-our $VERSION = '7.44';
+use warnings;
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Unix;
index 3db0f45..55f5022 100644 (file)
@@ -1,7 +1,7 @@
 package ExtUtils::MM_Win32;
 
 use strict;
-
+use warnings;
 
 =head1 NAME
 
@@ -27,7 +27,7 @@ use ExtUtils::MakeMaker qw(neatvalue _sprintf562);
 require ExtUtils::MM_Any;
 require ExtUtils::MM_Unix;
 our @ISA = qw( ExtUtils::MM_Any ExtUtils::MM_Unix );
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 $ENV{EMXSHELL} = 'sh'; # to run `commands`
index 4220e52..b3acb2a 100644 (file)
@@ -1,8 +1,9 @@
 package ExtUtils::MM_Win95;
 
 use strict;
+use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require ExtUtils::MM_Win32;
index 957ab16..14d0709 100644 (file)
@@ -3,7 +3,7 @@ package ExtUtils::MY;
 use strict;
 require ExtUtils::MM;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 our @ISA = qw(ExtUtils::MM);
 
index 6dceb98..470fc59 100644 (file)
@@ -2,6 +2,7 @@
 package ExtUtils::MakeMaker;
 
 use strict;
+use warnings;
 
 BEGIN {require 5.006;}
 
@@ -24,7 +25,7 @@ my %Recognized_Att_Keys;
 our %macro_fsentity; # whether a macro is a filesystem name
 our %macro_dep; # whether a macro is a dependency
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 # Emulate something resembling CVS $Revision$
@@ -1154,20 +1155,19 @@ sub check_hints {
 }
 
 sub _run_hintfile {
-    our $self;
-    local($self) = shift;       # make $self available to the hint file.
-    my($hint_file) = shift;
+    my ($self, $hint_file) = @_;
 
     local($@, $!);
     print "Processing hints file $hint_file\n" if $Verbose;
 
     # Just in case the ./ isn't on the hint file, which File::Spec can
     # often strip off, we bung the curdir into @INC
-    local @INC = (File::Spec->curdir, @INC);
-    my $ret = do $hint_file;
-    if( !defined $ret ) {
-        my $error = $@ || $!;
-        warn $error;
+    if(open(my $fh, '<', $hint_file)) {
+        eval join('', <$fh>);
+        warn "Failed to run hint file $hint_file: $@" if $@;
+    }
+    else {
+        warn "Could not open $hint_file for read: $!";
     }
 }
 
index 5c93f0a..0265645 100644 (file)
@@ -1,8 +1,9 @@
 package ExtUtils::MakeMaker::Config;
 
 use strict;
+use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 use Config ();
index a82c53b..237f1d5 100644 (file)
@@ -1,6 +1,6 @@
 package ExtUtils::MakeMaker::FAQ;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 1;
index 8931826..dc0e5ad 100644 (file)
@@ -1,7 +1,8 @@
 package ExtUtils::MakeMaker::Locale;
 
 use strict;
-our $VERSION = "7.44";
+use warnings;
+our $VERSION = "7.48";
 $VERSION =~ tr/_//d;
 
 use base 'Exporter';
index 6365e4b..a396b1f 100644 (file)
@@ -1,6 +1,6 @@
 package ExtUtils::MakeMaker::Tutorial;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 
index c94c855..720a0a4 100644 (file)
@@ -12,10 +12,11 @@ package ExtUtils::MakeMaker::version;
 
 use 5.006001;
 use strict;
+use warnings;
 
 use vars qw(@ISA $VERSION $CLASS $STRICT $LAX *declare *qv);
 
-$VERSION = '7.44';
+$VERSION = '7.48';
 $VERSION =~ tr/_//d;
 $CLASS = 'version';
 
@@ -25,7 +26,7 @@ $CLASS = 'version';
     if ( $@ ) { # don't have any version.pm installed
         eval "use ExtUtils::MakeMaker::version::vpp";
         die "$@" if ( $@ );
-        local $^W;
+        no warnings;
         delete $INC{'version.pm'};
         $INC{'version.pm'} = $INC{'ExtUtils/MakeMaker/version.pm'};
         push @version::ISA, "ExtUtils::MakeMaker::version::vpp";
index 7cfed5b..ada8c8b 100644 (file)
@@ -7,10 +7,11 @@
 package ExtUtils::MakeMaker::version::regex;
 
 use strict;
+use warnings;
 
 use vars qw($VERSION $CLASS $STRICT $LAX);
 
-$VERSION = '7.44';
+$VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 #--------------------------------------------------------------------------#
index a11a950..1e084e9 100644 (file)
@@ -1,9 +1,9 @@
 package ExtUtils::Mkbootstrap;
 
-# There's just too much Dynaloader incest here to turn on strict vars.
-use strict 'refs';
+use strict;
+use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 require Exporter;
@@ -33,6 +33,7 @@ sub Mkbootstrap {
     if (-f "${baseext}_BS"){
        $_ = "${baseext}_BS";
        package DynaLoader; # execute code as if in DynaLoader
+       no strict 'vars';
        local($osname, $dlsrc) = (); # avoid warnings
        ($osname, $dlsrc) = @Config::Config{qw(osname dlsrc)};
        $bscode = "";
@@ -43,6 +44,7 @@ sub Mkbootstrap {
 
     if ($Config{'dlsrc'} =~ /^dl_dld/){
        package DynaLoader;
+       no strict 'vars';
        push(@dl_resolve_using, dl_findfile('-lc'));
     }
 
index 9279b6b..8e12925 100644 (file)
@@ -3,6 +3,7 @@ package ExtUtils::Mksymlists;
 use 5.006;
 use strict qw[ subs refs ];
 # no strict 'vars';  # until filehandles are exempted
+use warnings;
 
 use Carp;
 use Exporter;
@@ -10,7 +11,7 @@ use Config;
 
 our @ISA = qw(Exporter);
 our @EXPORT = qw(&Mksymlists);
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 sub Mksymlists {
index 1ccaf77..eee8391 100644 (file)
@@ -3,7 +3,7 @@ package ExtUtils::testlib;
 use strict;
 use warnings;
 
-our $VERSION = '7.44';
+our $VERSION = '7.48';
 $VERSION =~ tr/_//d;
 
 use Cwd;
index ba6baac..34b530e 100644 (file)
@@ -5,6 +5,7 @@ BEGIN {
 }
 chdir 't';
 
+use warnings;
 use Test::More;
 
 my $Has_Test_Pod;
index faf56e3..dceed52 100644 (file)
@@ -21,6 +21,7 @@ plan skip_all => "ExtUtils::CBuilder not installed or couldn't find a compiler"
 plan skip_all => 'Shared perl library' if $Config{useshrplib} eq 'true';
 plan skip_all => $^O if $^O =~ m!^(MSWin32|cygwin|haiku|darwin)$!;
 plan skip_all => 'Skipped when not PERL_CORE nor in git repo' unless $ENV{PERL_CORE} or $release;
+plan skip_all => 'Skipped as perl.exp is not in scope' if -s '../../../perl.exp' && $ENV{PERL_CORE};
 my @tests = list_static();
 plan skip_all => "No tests" unless @tests;
 plan tests => 6 * @tests;
index cb8d0db..ba645b2 100644 (file)
@@ -5,6 +5,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 7;
 
 use MakeMaker::Test::Setup::BFD;
index 3562162..b242a45 100644 (file)
@@ -10,6 +10,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 26;
 use MakeMaker::Test::Utils;
 use MakeMaker::Test::Setup::BFD;
index 6939811..31d645b 100644 (file)
@@ -7,6 +7,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use File::Path;
 use Config;
 my @INSTDIRS = ('../dummy-install', '../dummy  install');
index 5f7d395..1a79de2 100644 (file)
@@ -10,6 +10,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 52;
 use MakeMaker::Test::Utils;
 use MakeMaker::Test::Setup::BFD;
index 934b83a..7964186 100644 (file)
@@ -4,6 +4,7 @@ use lib 't/lib';
 chdir 't';
 
 use strict;
+use warnings;
 use Test::More tests => 6;
 
 
index 731c976..a0b7259 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib';
 }
index 0f9825b..679a610 100644 (file)
@@ -5,6 +5,8 @@ BEGIN {
 }
 chdir 't';
 
+use strict;
+use warnings;
 use Test::More;
 
 BEGIN {
index a37cb62..5a7f8b3 100644 (file)
@@ -6,6 +6,7 @@ BEGIN {
 chdir 't';
 
 use strict;
+use warnings;
 use Test::More;
 
 BEGIN {
@@ -116,7 +117,7 @@ SKIP: {
 
 # Our copy of Perl (with a unix-path) should always be executable.
 SKIP: {
-  skip "The Perl may not be installed yet when in core" if $ENV{PERL_CORE};
+  skip "The Perl may not be installed yet when in core", 1 if $ENV{PERL_CORE};
   ok(MM->maybe_command($Config{perlpath}), qq{'$Config{perlpath}' should be executable});
 }
 
index 447abd2..5937856 100644 (file)
@@ -5,7 +5,8 @@ BEGIN {
 }
 chdir 't';
 
-
+use strict;
+use warnings;
 use Test::More;
 
 BEGIN {
index 3af343d..2f6f28d 100644 (file)
@@ -6,6 +6,7 @@ BEGIN {
 chdir 't';
 
 use strict;
+use warnings;
 use Test::More;
 if ($^O =~ /os2/i) {
        plan( tests => 32 );
index 62b291c..b3175f4 100644 (file)
@@ -19,6 +19,7 @@ BEGIN {
 BEGIN { use_ok( 'ExtUtils::MM_Unix' ); }
 
 use strict;
+use warnings;
 use File::Spec;
 
 my $class = 'ExtUtils::MM_Unix';
index 39a5aad..b3deee6 100644 (file)
@@ -1,10 +1,15 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib';
 }
 chdir 't';
 
+my @Methods;
+
 BEGIN {
     @Methods = (qw(wraplist
                    rootdir
index bac36bf..e10b365 100644 (file)
@@ -6,6 +6,7 @@ BEGIN {
 chdir 't';
 
 use strict;
+use warnings;
 use Test::More;
 
 BEGIN {
index 81e49c0..c0edfda 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib/';
 }
index 56942c8..a0464a9 100644 (file)
@@ -7,6 +7,7 @@ BEGIN {
 chdir 't';
 
 use strict;
+use warnings;
 use Test::More tests => 1;
 use MakeMaker::Test::Utils;
 use ExtUtils::MakeMaker;
index 662c48d..d8659df 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 # This is a test of WriteEmptyMakefile.
 
 BEGIN {
index 076415b..83c51c8 100644 (file)
@@ -1,6 +1,7 @@
 #!/usr/bin/perl -w
 
 use strict;
+use warnings;
 use lib 't/lib';
 
 use TieOut;
index a9ecb82..f1326a3 100644 (file)
@@ -8,6 +8,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 2;
 
 require ExtUtils::MakeMaker;
index 7c87c75..a937006 100644 (file)
@@ -13,6 +13,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Config;
 use ExtUtils::MakeMaker;
 use utf8;
@@ -132,8 +133,11 @@ like( $ppd_html, qr{^\s*<REQUIRE NAME="strict::" />}m,  '  <REQUIRE>' );
 unlike( $ppd_html, qr{^\s*<REQUIRE NAME="warnings::" />}m,  'no <REQUIRE> for build_require' );
 
 my $archname = $Config{archname};
-if( "$]" >= 5.008 ) {
-    # XXX This is a copy of the internal logic, so it's not a great test
+# XXX This is a copy of the internal logic, so it's not a great test
+if( "$]" >= 5.010) {
+    $archname .= "-$^V->{version}->[0].$^V->{version}->[1]";
+}
+elsif( "$]" >= 5.008 ) {
     $archname .= "-$Config{PERL_REVISION}.$Config{PERL_VERSION}";
 }
 like( $ppd_html, qr{^\s*<ARCHITECTURE NAME="$archname" />}m,
index d2ab550..59a80eb 100644 (file)
@@ -7,6 +7,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 50;
 
 use File::Spec;
index 57da1df..6d39163 100644 (file)
@@ -4,6 +4,8 @@ BEGIN {
     unshift @INC, 't/lib/';
 }
 
+use strict;
+use warnings;
 use File::Temp qw[tempdir];
 my $tmpdir = tempdir( DIR => 't', CLEANUP => 1 );
 use Cwd; my $cwd = getcwd; END { chdir $cwd } # so File::Temp can cleanup
@@ -21,7 +23,7 @@ my @cd_args = ($dir, "command1", "command2");
 {
     package Test::MM_Win32;
     use ExtUtils::MM_Win32;
-    @ISA = qw(ExtUtils::MM_Win32);
+    our @ISA = qw(ExtUtils::MM_Win32);
 
     my $mm = bless {}, 'Test::MM_Win32';
 
index aca3dc6..341d2d5 100644 (file)
@@ -4,6 +4,8 @@ BEGIN {
     unshift @INC, 't/lib/';
 }
 
+use strict;
+use warnings;
 use Test::More tests => 3;
 use Config ();
 
index 0b899bf..a5a7d6d 100644 (file)
@@ -5,6 +5,8 @@ BEGIN {
 }
 chdir 't';
 
+use strict;
+use warnings;
 use ExtUtils::Command;
 use Test::More tests => 1;
 
index 95dce69..12f52b0 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 use lib 't/lib';
 
 use File::Temp qw[tempdir];
index 32a6f59..0233c2f 100644 (file)
@@ -1,5 +1,10 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
+my $Testfile;
+
 BEGIN {
     unshift @INC, 't/lib/';
 }
index 0ca8ffb..e23d840 100644 (file)
@@ -7,6 +7,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use lib './lib';
 use Test::More 'no_plan';
 
index 1357a2d..b942a5f 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 # Try to test fixin.  I say "try" because what fixin will actually do
 # is highly variable from system to system.
 
index 6b3cf73..7689e37 100644 (file)
@@ -61,9 +61,7 @@ CLOO
     local $SIG{__WARN__} = sub { $stderr .= join '', @_ };
 
     $mm->check_hints;
-    is( $stderr, <<OUT, 'hint files produce errors' );
-Argh!
-OUT
+    like( $stderr, qr{^Failed to run hint file hints\S+\.pl: Argh!\n\z}, 'hint files produce errors' );
 }
 
 END {
index 07e300e..2c6cb09 100644 (file)
@@ -8,6 +8,7 @@ BEGIN {
 
 use lib './lib';
 use strict;
+use warnings;
 use ExtUtils::MakeMaker;
 
 use Test::More "no_plan";
index df36e82..29e4856 100644 (file)
@@ -2,6 +2,8 @@ package MakeMaker::Test::NoXS;
 
 # Disable all XS loading.
 
+use strict;
+use warnings;
 use Carp;
 
 require DynaLoader;
@@ -11,12 +13,18 @@ require XSLoader;
 delete $DynaLoader::{boot_DynaLoader};
 
 if ($^O eq 'MSWin32') {
+    # Load Win32. Then clear the stash of all other entries but GetCwd and SetChildShowWindow
+    # SetChildShowWindow and GetCwd are provided by perl core in modern perls, so we
+    # can use them in miniperl. on older perls, we can load them from Win32 so the
+    # test can proceed as normal.
+
     require Win32;
-    my $GetCwd = *{'Win32::GetCwd'}{CODE};
-    my $SetChildShowWindow = *{'Win32::SetChildShowWindow'}{CODE};
-    %{*main::Win32::{HASH}} = ();
-    *{'Win32::GetCwd'} = $GetCwd;
-    *{'Win32::SetChildShowWindow'} = $SetChildShowWindow;
+
+    foreach my $slot (keys %Win32::) {
+        next if $slot eq 'GetCwd';
+        next if $slot eq 'SetChildShowWindow';
+        delete $Win32::{$slot};
+    }
 }
 
 # This isn't 100%.  Things like Win32.pm will crap out rather than
index cfe49e5..7690946 100644 (file)
@@ -5,6 +5,7 @@ require Exporter;
 @EXPORT = qw(setup_recurs teardown_recurs);
 
 use strict;
+use warnings;
 use File::Path;
 use File::Basename;
 use MakeMaker::Test::Utils;
index 1dd2c2e..eb0a21c 100644 (file)
@@ -5,6 +5,7 @@ require Exporter;
 @EXPORT = qw(run_tests list_dynamic list_static);
 
 use strict;
+use warnings;
 use File::Path;
 use MakeMaker::Test::Utils;
 use Config;
@@ -134,7 +135,7 @@ my %Files = (
   'Makefile.PL' => sprintf($MAKEFILEPL, 'Test', 'lib/XS/Test.pm', qq{'$typemap'}, ''),
 );
 
-my %label2files = (basic => \%Files);
+my %label2files = (basic => \%Files, basic2 => \%Files); # basic2 so no clash
 
 $label2files{bscode} = +{
   %{ $label2files{'basic'} }, # make copy
@@ -381,7 +382,7 @@ sub setup_xs {
 
 sub list_static {
   (
-    ( !$Config{usedl} ? [ 'basic', '', '' ] : ()), # still needs testing on static perl
+    ( !$Config{usedl} ? [ 'basic2', '', '' ] : ()), # still needs testing on static perl
     [ 'static', '', '' ],
     [ 'basic', ' static', '_static' ],
     [ 'multi', ' static', '_static' ],
index 76c1ad5..eedf85b 100644 (file)
@@ -2,6 +2,7 @@ package MakeMaker::Test::Utils;
 
 use File::Spec;
 use strict;
+use warnings;
 use Config;
 use Cwd qw(getcwd);
 use Carp qw(croak);
@@ -359,11 +360,15 @@ Returns true if there is a compiler available for XS builds.
 
 sub have_compiler {
     my $have_compiler = 0;
-    eval {
-        require ExtUtils::CBuilder;
-        my $cb = ExtUtils::CBuilder->new(quiet=>1);
-        $have_compiler = $cb->have_compiler;
-    };
+
+    in_dir(sub {
+        eval {
+            require ExtUtils::CBuilder;
+            my $cb = ExtUtils::CBuilder->new(quiet=>1);
+            $have_compiler = $cb->have_compiler;
+        };
+    });
+
     return $have_compiler;
 }
 
index a240867..293dbaa 100644 (file)
@@ -1,5 +1,8 @@
 package TieIn;
 
+use strict;
+use warnings;
+
 sub TIEHANDLE {
     bless( \(my $scalar), $_[0]);
 }
index 0a0f5f9..aee9c32 100644 (file)
@@ -1,5 +1,8 @@
 package TieOut;
 
+use strict;
+use warnings;
+
 sub TIEHANDLE {
     my $scalar = '';
     bless( \$scalar, $_[0]);
index 622dbd5..e5b91f8 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib/';
 }
index ccb6a77..049c8df 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib';
 }
index bb3670a..d451085 100644 (file)
@@ -3,6 +3,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More;
 BEGIN {
   eval { require CPAN::Meta; CPAN::Meta->VERSION(2.143240) }
index 3085c22..3bee15b 100644 (file)
@@ -8,6 +8,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 16;
 
 require ExtUtils::MM_Any;
index 20ff347..0f6df71 100644 (file)
@@ -4,6 +4,7 @@
 # This mostly means no XS modules.
 
 use strict;
+use warnings;
 use lib 't/lib';
 
 use Test::More;
index e7c2621..daeaea9 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib';
 }
index 42396c0..854112b 100644 (file)
@@ -5,6 +5,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 1;
 use ExtUtils::MakeMaker;
 
index dc9919a..f90b947 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib';
 }
@@ -25,7 +28,7 @@ my %versions = (q[$VERSION = '1.00']            => '1.00',
                 q[my $VERSION = '1.01']         => 'undef',
                 q[local $VERSION = '1.02']      => 'undef',
                 q[local $FOO::VERSION = '1.30'] => 'undef',
-                q[if( $Foo::VERSION >= 3.00 ) {]=> 'undef',
+                q[if( $Foo::VERSION >= 3.00 ) {]=> undef,
                 q[our $VERSION = '1.23';]       => '1.23',
                 q[$CGI::VERSION='3.63']         => '3.63',
                 q[$VERSION = "1.627"; # ==> ALSO update the version in the pod text below!] => '1.627',
@@ -44,7 +47,6 @@ my %versions = (q[$VERSION = '1.00']            => '1.00',
                 '$VERSION = substr(q$Revision: 2.8 $, 10) + 2 . "";'                   => '4.8',
                 q[our $VERSION = do { my @r = ( q$Revision: 2.7 $ =~ /\d+/g ); sprintf "%d." . "%02d" x $#r, @r };] => '2.07', # Fucking seriously?
                 'elsif ( $Something::VERSION >= 1.99 )' => undef,
-
                );
 
 if( $Has_Version ) {
@@ -60,11 +62,9 @@ if( "$]" >= 5.011001 ) {
     $versions{'package Foo::Bar v1.2.3;'  } = 'v1.2.3';
     $versions{' package Foo::Bar 1.23 ;'  } = '1.23';
     $versions{"package Foo'Bar 1.23;"     } = '1.23';
-    $versions{"package Foo::Bar 1.2.3;"   } = '1.2.3';
     $versions{'package Foo 1.230;'        } = '1.230';
-    $versions{'package Foo 1.23_01;'      } = '1.23_01';
-    $versions{'package Foo v1.23_01;'     } = 'v1.23_01';
-    $versions{q["package Foo 1.23"]}        = 'undef';
+    $versions{q["package Foo 1.23"]}        = undef;
+    $versions{q[our $VERSION = "1.00 / the fucking fuck";]} = 'undef';
     $versions{<<'END'}                      = '1.23';
 package Foo 1.23;
 our $VERSION = 2.34;
@@ -88,10 +88,7 @@ if( "$]" >= 5.014 ) {
     $versions{'package Foo::Bar v1.2.3 { }'  } = 'v1.2.3';
     $versions{' package Foo::Bar 1.23 { }'   } = '1.23';
     $versions{"package Foo'Bar 1.23 { }"     } = '1.23';
-    $versions{"package Foo::Bar 1.2.3 { }"   } = '1.2.3';
     $versions{'package Foo 1.230 { }'        } = '1.230';
-    $versions{'package Foo 1.23_01 { }'      } = '1.23_01';
-    $versions{'package Foo v1.23_01 { }'     } = 'v1.23_01';
     $versions{<<'END'}                      = '1.23';
 package Foo 1.23 {
 our $VERSION = 2.34;
index 42f028f..fa4e3e9 100644 (file)
@@ -7,6 +7,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 6;
 
 use TieOut;
index ebf5f94..e00c5de 100644 (file)
@@ -3,6 +3,7 @@
 # Ensure pm_to_blib runs at the right times.
 
 use strict;
+use warnings;
 use lib 't/lib';
 
 use File::Temp qw[tempdir];
index e3bc00d..9d6cf4c 100644 (file)
@@ -3,6 +3,7 @@
 # Test our simulation of pod2man
 
 use strict;
+use warnings;
 use lib 't/lib';
 
 use ExtUtils::Command::MM;
index a20df13..eb58b0f 100644 (file)
@@ -7,6 +7,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Config;
 use Test::More tests => 8;
 use MakeMaker::Test::Utils;
index b9e253a..d8e54cb 100644 (file)
@@ -5,6 +5,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More;
 
 if( $^O eq 'VMS' ) {
index a01ff2b..c51cf1d 100644 (file)
@@ -8,6 +8,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Config;
 use Test::More tests => 21;
 use File::Temp qw[tempdir];
index c6135e4..3b68a90 100644 (file)
@@ -5,6 +5,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Config;
 
 use Test::More;
index ffe3f05..50a861d 100644 (file)
@@ -6,6 +6,7 @@ BEGIN {
 chdir 't';
 
 use strict;
+use warnings;
 use Test::More tests => 5;
 use ExtUtils::MM;
 use MakeMaker::Test::Utils;
index 453a695..3d99e46 100644 (file)
@@ -5,6 +5,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Test::More tests => 11;
 use ExtUtils::MakeMaker;
 use TieOut;
index 97e19c7..38e1341 100644 (file)
@@ -1,5 +1,8 @@
 #!/usr/bin/perl -w
 
+use strict;
+use warnings;
+
 BEGIN {
     unshift @INC, 't/lib';
 }
index f1b0f1e..0def030 100644 (file)
@@ -8,7 +8,7 @@ BEGIN {
 }
 
 use strict;
-
+use warnings;
 use TieOut;
 use MakeMaker::Test::Utils;
 use Config;
index 6e6bab3..538dee1 100644 (file)
@@ -6,6 +6,8 @@ BEGIN {
 
 chdir 't';
 
+use strict;
+use warnings;
 use Config;
 use ExtUtils::MM;
 use MakeMaker::Test::Utils;
@@ -31,12 +33,12 @@ my @test_args = qw(foo bar baz yar car har ackapicklerootyjamboree);
 my @cmds = $mm->split_command($echo, @test_args);
 isnt( @cmds, 0 );
 
-@results = _run(@cmds);
+my @results = _run(@cmds);
 is( join('', @results), join('', @test_args));
 
 
 my %test_args = ( foo => 42, bar => 23, car => 'har' );
-$even_args = $mm->oneliner(q{print !(@ARGV % 2)});
+my $even_args = $mm->oneliner(q{print !(@ARGV % 2)});
 @cmds = $mm->split_command($even_args, %test_args);
 isnt( @cmds, 0 );
 
index fa82631..4fd09a4 100644 (file)
@@ -12,6 +12,7 @@ BEGIN {
 # Use things from t/lib/
 use lib './lib';
 use strict;
+use warnings;
 use ExtUtils::MakeMaker;
 
 use Test::More tests => 1;
index 90691ae..b758be7 100644 (file)
@@ -6,6 +6,8 @@ BEGIN {
 }
 chdir 't';
 
+use strict;
+use warnings;
 use Test::More tests => 5;
 
 BEGIN {
diff --git a/cpan/ExtUtils-MakeMaker/t/testrules.yml b/cpan/ExtUtils-MakeMaker/t/testrules.yml
deleted file mode 100644 (file)
index 97fad8c..0000000
+++ /dev/null
@@ -1,11 +0,0 @@
----
-# TAP::Harness test rules
-# "t\02-xsdynamic.t" (and possibly "t\03-xsstatic.t") should *not* be run in parallel
-# ... allowing overlap of these tests causes race conditions which lead to intermittent failures
-seq:
-  - seq:
-    # serialize all tests in files matching "t/0*.t"
-    - t{\\,/}0*.t
-  - par:
-    # run all other tests in parallel
-    - **
index 14a0c85..f9b7532 100644 (file)
@@ -6,6 +6,7 @@ BEGIN {
 chdir 't';
 
 use strict;
+use warnings;
 use ExtUtils::MM;
 use MakeMaker::Test::Utils qw(makefile_name make make_run run hash2files);
 use Test::More;
index 63ef8e2..9fc17c6 100644 (file)
@@ -93,7 +93,7 @@ sub run_test {
   local $_;
   SKIP: {
     skip "No vstring test <5.8", 2
-      if "$]" < 5.008 && $pkg eq 'BareV2String' && $descrip =~ m!^2-part!;
+      if "$]" <= 5.008 && $pkg eq 'BareV2String' && $descrip =~ m!^2-part!;
     my $warnings;
     eval { $warnings = capture_make("Fake::$pkg" => $version); };
     is($@, '', "$descrip not fatal") or skip "$descrip WM failed", 1;
index 460a8a2..7fa6727 100644 (file)
@@ -8,6 +8,7 @@ BEGIN {
 }
 
 use strict;
+use warnings;
 use Config;
 use Test::More tests => 43;
 
index 7386d36..4973b08 100644 (file)
@@ -59,6 +59,7 @@
 /ExtUtils/MM_MacOS.pm
 /ExtUtils/MM_NW5.pm
 /ExtUtils/MM_OS2.pm
+/ExtUtils/MM_OS390.pm
 /ExtUtils/MM_QNX.pm
 /ExtUtils/MM_UWIN.pm
 /ExtUtils/MM_Unix.pm
index 886780f..be1dc16 100644 (file)
@@ -5,7 +5,6 @@ Config::Perl::V cpan/Config-Perl-V/V.pm 0a0f7207e6505b78ee345a933acb0246a13579f5
 Devel::PPPort dist/Devel-PPPort/Makefile.PL c939c8d33d11994c06f546869df63d4518ece797
 Digest cpan/Digest/Digest.pm 43f7f544cb11842b2f55c73e28930da50774e081
 ExtUtils::Constant cpan/ExtUtils-Constant/t/Constant.t d5c75c41d6736a0c5897130f534af0896a7d6f4d
-ExtUtils::MakeMaker cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Setup/XS.pm 9dd84951b7602239516659c15d23c3c9eeebd1ab
 ExtUtils::PL2Bat cpan/ExtUtils-PL2Bat/t/make_executable.t 6e63dbf43ee7ff5a54e615a576360cb0f1825694
 Filter::Util::Call pod/perlfilter.pod 9b4aec0d8518274ddb0dd37e3b770fe13a44dd1f
 Locale::Maketext::Simple cpan/Locale-Maketext-Simple/lib/Locale/Maketext/Simple.pm 57ed38905791a17c150210cd6f42ead22a7707b6