3 use vars qw($bootstrapping);
6 if (my ($x) = grep { /^--bootstrap(?:=.*)?$/ } @ARGV) {
7 @ARGV = grep { !/^--bootstrap(?:=.*)?$/ } @ARGV;
9 $x =~ /^--bootstrap(?:=(.*))?$/;
10 my @args = (defined $1 ? ($1) : ());
12 $ENV{PERL_MM_USE_DEFAULT} = 1;
19 local::lib->import(@args);
21 push(@ARGV,$ENV{PERL_MM_OPT});
23 system($^X, '-MExtUtils::MakeMaker 6.31', '-e1');
26 system($^X, '-MCPAN 1.80', '-e1');
28 my $cpan_command = '';
30 system($^X, '-MCPAN', '-e',
32 unless (-w $CPAN::Config->{keep_source_where}) {
33 $ENV{PERL_MM_USE_DEFAULT} = 0;
34 my $save = $CPAN::Config->{urllist};
35 delete @{$CPAN::Config}{keys %$CPAN::Config};
36 $CPAN::Config->{urllist} = $save;
41 # XXX - remove the force on EUMM once its test suite survive PERL_MM_OPT
43 if ($eumm) { # non-zero exit
44 $cpan_command .= 'force("install","ExtUtils::MakeMaker"); ';
47 $cpan_command .= 'force("install","CPAN"); ';
49 if(length $cpan_command) {
50 system($^X, '-MCPAN', '-e', $cpan_command);
53 system($^X, '-MCPAN', '-e', 'CPAN::Config->load; CPAN::Config->commit;');
58 use inc::Module::Install;
61 all_from 'lib/local/lib.pm';
63 requires 'ExtUtils::MakeMaker' => '6.31'; # version INSTALL_BASE was added
64 requires 'ExtUtils::CBuilder'; # this and ParseXS are needed for MB C_support
65 requires 'ExtUtils::ParseXS';
66 requires 'Module::Build' => '0.28'; # lib -> lib/perl5 change
67 requires 'CPAN' => '1.80'; # sudo support
70 # https://rt.cpan.org/Public/Bug/Display.html?id=23735
71 # for why CPAN now sets the CPANPLUS env var.
72 # trouble is this means we can't auto_install(_now) CPAN itself
73 # without this beautiful hack
75 my $no_cpanplus_env = !exists $ENV{PERL5_CPANPLUS_IS_RUNNING};
77 delete $ENV{PERL5_CPANPLUS_IS_RUNNING} if $no_cpanplus_env;