Jrobinson/configure for cross

Configure

@@ -3023,11 +3023,11 @@ do
   case "\$f" in
   /*)
     $targetmkdir \`dirname \$f\`
-    $targetto -P $targetport $q \$f $targetuser@$targethost:\$f            || exit 1
+    $targetto -P $targetport -r $q \$f $targetuser@$targethost:\$f            || exit 1
     ;;
   *)
     $targetmkdir $targetdir/\`dirname \$f\`
-    $targetto -P $targetport $q \$f $targetuser@$targethost:$targetdir/\$f || exit 1
+    $targetto -P $targetport -r $q \$f $targetuser@$targethost:$targetdir/\$f || exit 1
     ;;
   esac
 done

Makefile.SH

@@ -1514,9 +1514,63 @@ test_prep test-prep: test_prep_pre \$(MINIPERL_EXE) \$(unidatafiles) \$(PERL_EXE
 	$to lib
 	$to TestInit.pm
 	$to win32/FindExt.pm
-	$to regen/keywords.pl
-	$to pod/perldiag.pod
+	$to regen
+	$to pod
 	$to MANIFEST
+	$to Porting
+	$to cpan/*/t
+	$to dist/*/t
+	$to ext/*/t
+	$to cpan/Term-Cap/test.pl
+	$to cpan/Pod-Usage
+	$to cpan/Pod-Parser
+	$to cpan/IO-Compress/examples
+	$to cpan/HTTP-Tiny/lib
+	$to cpan/Filter-Util-Call/filter-util.pl
+	$to cpan/File-CheckTree/lib
+	$to cpan/Digest-MD5/README
+	$to cpan/Digest-MD5/MD5.xs
+	$to cpan/Digest-SHA/src
+	$to cpan/Test-Simple/examples
+	$to cpan/Pod-Parser/lib
+	$to cpan/Test-Harness/MANIFEST
+	$to cpan/Test-Harness/MANIFEST.CUMMULATIVE
+	$to cpan/List-Util/blib
+	$to ext/IPC-Open3/Makefile
+	$to ext/Tie-Memoize/lib
+	$to ext/POSIX/POSIX.xs
+	$to ext/POSIX/Makefile.PL
+	$to dist/IO/Makefile.PL
+# --- These two are needed by ExtUtils::MM_Unix to verify PERL_CORE
+	$to config_h.SH
+	$to perl.h
+	$to cflags
+# --- For Module::Build
+	$to cpan/Module-Build/lib
+	$to *.h
+# --- For t/porting/perlfunc.t
+	$to ext/Pod-Functions
+# --- For t/porting/pod_rules.t
+	$to Makefile.SH
+	$to cpan/perlfaq
+	$to cpan/Pod-Perldoc/lib/perldoc.pod
+	$to dist/ExtUtils-ParseXS/lib/perlxs.pod
+	$to dist/ExtUtils-ParseXS/lib/perlxstut.pod
+	$to dist/ExtUtils-ParseXS/lib/perlxstypemap.pod
+	$to win32/Makefile
+	$to win32/makefile.mk
+	$to win32/pod.mak
+	$to vms/descrip_mms.template
+# --- For t/porting/regen.t
+	$to keywords.c
+	$to regen.pl
+	$to regen_perly.pl
+	$to perly.tab
+	$to perly.act
+	$to perly.y
+	$to uconfig.sh
+# --- For t/x2p/s2p.t
+	$to x2p
 	cd t && (rm -f \$(PERL_EXE); \$(LNS) ../\$(PERL_EXE) \$(PERL_EXE)) && cd ..
 	$to t/\$(PERL_EXE)
 
@@ -1541,7 +1595,7 @@ test check: test_prep
 *) $spitshell >>$Makefile <<!GROK!THIS!
 
 test check: test_prep
-	$run -cwd $targetdir/t -env LD_LIBRARY_PATH=$targetdir ./TEST
+	$run -cwd $targetdir/t -env LD_LIBRARY_PATH=$targetdir:$targetdir/lib:$targetdir/lib/auto ./TEST
 
 !GROK!THIS!
 ;;

cpan/Archive-Extract/lib/Archive/Extract.pm

@@ -964,7 +964,7 @@ sub _gunzip_bin {
         return $self->_error(loc("Could not open '%1' for writing: %2",
                             $self->_gunzip_to, $! ));
 
-    my $cmd = [ $self->bin_gzip, '-cdf', $self->archive ];
+    my $cmd = [ $self->bin_gzip, '-c', '-d', '-f', $self->archive ];
 
     my $buffer;
     unless( scalar run( command => $cmd,

cpan/CPAN/lib/CPAN/Tarzip.pm

@@ -103,7 +103,7 @@ sub gunzip {
         return 1;
     } else {
         my $command = CPAN::HandleConfig->safe_quote($self->{UNGZIPPRG});
-        system(qq{$command -dc "$read" > "$write"})==0;
+        system(qq{$command -d -c "$read" > "$write"})==0;
     }
 }
 
@@ -188,7 +188,7 @@ sub TIEHANDLE {
         $class->debug("via Compress::Zlib");
     } else {
         my $gzip = CPAN::HandleConfig->safe_quote($self->{UNGZIPPRG});
-        my $pipe = "$gzip -dc $file |";
+        my $pipe = "$gzip -d -c $file |";
         my $fh = FileHandle->new($pipe) or $CPAN::Frontend->mydie("Could not pipe[$pipe]: $!");
         binmode $fh;
         $self->{FH} = $fh;
@@ -322,7 +322,7 @@ Can't continue cutting file '$file'.
         my $tarcommand = CPAN::HandleConfig->safe_quote($exttar);
         if ($is_compressed) {
             my $command = CPAN::HandleConfig->safe_quote($extgzip);
-            $system = qq{$command -dc }.
+            $system = qq{$command -d -c }.
                 qq{< "$file" | $tarcommand x${tar_verb}f -};
         } else {
             $system = qq{$tarcommand x${tar_verb}f "$file"};

cpan/CPANPLUS/t/04_CPANPLUS-Module.t

@@ -16,6 +16,7 @@ use Test::More 'no_plan';
 use Data::Dumper;
 use File::Spec;
 use File::Path ();
+use IPC::Cmd qw(can_run);
 
 my $Conf    = gimme_conf();
 my $CB      = CPANPLUS::Backend->new( $Conf );
@@ -305,9 +306,12 @@ isa_ok( $Auth->parent,          'CPANPLUS::Backend' );
                                 "       Object" );
 
     ### skiptests to make sure we don't get any test header mismatches
-    my $rv = $bundle->create( prereq_target => 'create', skiptest => 1 );
-    ok( $rv,                    "   Tested prereqs" );
-
+    SKIP: {
+        skip "make isn't available, not testing ->create", 1
+            if !can_run('make');
+        my $rv = $bundle->create( prereq_target => 'create', skiptest => 1 );
+        ok( $rv,                    "   Tested prereqs" );
+    }
 }
 
 ### test module from perl core ###

cpan/CPANPLUS/t/20_CPANPLUS-Dist-MM.t

@@ -12,12 +12,17 @@ use CPANPLUS::Dist;
 use CPANPLUS::Dist::MM;
 use CPANPLUS::Internals::Constants;
 
-use Test::More 'no_plan';
+use Test::More;
 use Cwd;
 use Config;
 use Data::Dumper;
 use File::Basename ();
 use File::Spec ();
+use IPC::Cmd ();
+
+if ( !IPC::Cmd::can_run('make') ) {
+    plan skip_all => "make is not available, can't test CPANPLUS::Dist::MM";
+}
 
 my $conf    = gimme_conf();
 my $cb      = CPANPLUS::Backend->new( $conf );
@@ -419,6 +424,7 @@ sub _custom_makefile_pl_sub {
     }
 }
 
+done_testing;
 
 # Local variables:
 # c-indentation-style: bsd

cpan/DB_File/t/db-btree.t

@@ -5,7 +5,7 @@ use strict;
 use Config;
 
 BEGIN {
-    if(-d "lib" && -f "TEST") {
+    if((-d "lib" && -f "TEST") || $ENV{PERL_CORE}) {
         if ($Config{'extensions'} !~ /\bDB_File\b/ ) {
             print "1..0 # Skip: DB_File was not built\n";
             exit 0;

cpan/DB_File/t/db-hash.t

@@ -3,9 +3,9 @@
 use warnings;
 use strict;
 use Config;
- 
+
 BEGIN {
-    if(-d "lib" && -f "TEST") {
+    if((-d "lib" && -f "TEST") || $ENV{PERL_CORE}) {
         if ($Config{'extensions'} !~ /\bDB_File\b/ ) {
             print "1..0 # Skip: DB_File was not built\n";
             exit 0;

cpan/DB_File/t/db-recno.t

@@ -4,7 +4,7 @@ use strict;
 use Config;
 
 BEGIN {
-    if(-d "lib" && -f "TEST") {
+    if((-d "lib" && -f "TEST") || $ENV{PERL_CORE}) {
         if ($Config{'extensions'} !~ /\bDB_File\b/ ) {
             print "1..0 # Skip: DB_File was not built\n";
             exit 0;

cpan/ExtUtils-Constant/t/Constant.t

@@ -13,6 +13,8 @@ use ExtUtils::Constant qw (C_constant autoload);
 use File::Spec;
 use Cwd;
 
+use IPC::Cmd qw(can_run);
+
 my $do_utf_tests = $] > 5.006;
 my $better_than_56 = $] > 5.007;
 # For debugging set this to 1.
@@ -38,6 +40,11 @@ my $make = $Config{make};
 $make = $ENV{MAKE} if exists $ENV{MAKE};
 if ($^O eq 'MSWin32' && $make eq 'nmake') { $make .= " -nologo"; }
 
+if ( $Config{usecrosscompile} && !can_run($make) ) {
+    print "1..0 # Cross-compiling and $make isn't available, skupping\n";
+    exit 0;
+}
+
 # VMS may be using something other than MMS/MMK
 my $mms_or_mmk = 0;
 my $vms_lc = 0;

cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm

@@ -15,7 +15,7 @@ use ExtUtils::MakeMaker qw($Verbose neatvalue);
 
 # If we make $VERSION an our variable parse_version() breaks
 use vars qw($VERSION);
-$VERSION = '6.66';
+$VERSION = '6.67';
 $VERSION = eval $VERSION;  ## no critic [BuiltinFunctions::ProhibitStringyEval]
 
 require ExtUtils::MM_Any;
@@ -959,6 +959,14 @@ MAKE
 	$(CHMOD) $(PERM_RWX) $@
 MAKE
 
+    if ( $Config::Config{d_libname_unique} ) {
+        push @m, <<'MAKE';
+# --- d_libname_unique is true, so library names should be "unique"
+	$(MV) $(INST_DYNAMIC) $(INST_ARCHAUTODIR)/Perl_$(NAME_SYM).$(DLEXT)
+	-$(MV) $(INST_BOOT) $(INST_ARCHAUTODIR)/Perl_$(NAME_SYM).bs
+MAKE
+    }
+
     return join('',@m);
 }
 

cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm

@@ -18,7 +18,7 @@ our @Overridable;
 my @Prepend_parent;
 my %Recognized_Att_Keys;
 
-our $VERSION = '6.66';
+our $VERSION = '6.67';
 $VERSION = eval $VERSION;  ## no critic [BuiltinFunctions::ProhibitStringyEval]
 
 # Emulate something resembling CVS $Revision$

cpan/ExtUtils-MakeMaker/t/INSTALL_BASE.t

@@ -40,7 +40,9 @@ ok( grep(/^Writing $makefile for Big::Dummy/,
          @mpl_out) == 1,
                                            'Makefile.PL output looks right');
 
+SKIP: {
 my $make = make_run();
+skip "make is not available", 14 if !$make;
 run("$make");   # this is necessary due to a dmake bug.
 my $install_out = run("$make install");
 is( $?, 0, '  make install exited normally' ) || diag $install_out;
@@ -72,3 +74,4 @@ is( $?, 0, 'realclean' ) || diag($realclean_out);
 
 open(STDERR, ">&SAVERR") or die $!;
 close SAVERR;
+}

cpan/ExtUtils-MakeMaker/t/PL_FILES.t

@@ -28,9 +28,12 @@ ok chdir('PL_FILES-Module');
 run(qq{$perl Makefile.PL});
 cmp_ok( $?, '==', 0 );
 
+SKIP: {
+    skip "make is not available", 5 if !$make;
 my $make_out = run("$make");
 is( $?, 0 ) || diag $make_out;
 
 foreach my $file (qw(single.out 1.out 2.out blib/lib/PL/Bar.pm)) {
     ok( -e $file, "$file was created" );
 }
+}

cpan/ExtUtils-MakeMaker/t/basic.t

@@ -11,8 +11,20 @@ use strict;
 use Config;
 use ExtUtils::MakeMaker;
 
-use Test::More tests => 171;
+use Test::More;
 use MakeMaker::Test::Utils;
+
+my $make;
+BEGIN {
+    $make = make_run();
+    if ( !make ) {
+        plan skip_all => "make isn't available";
+    }
+    else {
+        plan tests => 171;
+    }
+}
+
 use MakeMaker::Test::Setup::BFD;
 use File::Find;
 use File::Spec;
@@ -61,8 +73,6 @@ cmp_ok( $Touch_Time, '<=', $mtime,  '  its been touched' );
 
 END { unlink makefile_name(), makefile_backup() }
 
-my $make = make_run();
-
 {
     # Supress 'make manifest' noise
     local $ENV{PERL_MM_MANIFEST_VERBOSE} = 0;

cpan/ExtUtils-MakeMaker/t/echo.t

@@ -30,6 +30,8 @@ $mm->init_tools;  # need ECHO
 # Run Perl with the currently installing MakeMaker
 $mm->{$_} .= q[ "-I$(INST_ARCHLIB)" "-I$(INST_LIB)"] for qw( PERLRUN FULLPERLRUN ABSPERLRUN );
 
+plan skip_all => "make isn't available" if !$make;
+
 #------------------- Testing functions
 
 sub test_for_echo {

cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm

@@ -211,6 +211,7 @@ sub make {
     my $make = $Config{make};
     $make = $ENV{MAKE} if exists $ENV{MAKE};
 
+    return if !can_run($make);
     return $make;
 }
 
@@ -224,6 +225,7 @@ Returns the make to run as with make() plus any necessary switches.
 
 sub make_run {
     my $make = make;
+    return if !$make;
     $make .= ' -nologo' if $make eq 'nmake';
 
     return $make;
@@ -411,6 +413,46 @@ sub slurp {
     return $text;
 }
 
+
+=item can_run
+
+  $exec = can_run($exec);
+
+Returns the executable, possibly with a full path attached, if it can be
+run. Basically IPC::Cmd::can_run.
+
+=cut
+
+sub can_run {
+    my $command = shift;
+
+    # a lot of VMS executables have a symbol defined
+    # check those first
+    if ( $^O eq 'VMS' ) {
+        require VMS::DCLsym;
+        my $syms = VMS::DCLsym->new;
+        return $command if scalar $syms->getsym( uc $command );
+    }
+
+    my @possibles;
+
+    if( File::Spec->file_name_is_absolute($command) ) {
+        return MM->maybe_command($command);
+
+    } else {
+        for my $dir (
+            File::Spec->path,
+            File::Spec->curdir
+        ) {
+            next if ! $dir || ! -d $dir;
+            my $abs = File::Spec->catfile( $^O eq 'MSWin32' ? Win32::GetShortPathName( $dir ) : $dir, $command);
+            push @possibles, $abs if $abs = MM->maybe_command($abs);
+        }
+    }
+
+    return shift @possibles;
+}
+
 =back
 
 =head1 AUTHOR