1# Note: this file was auto-generated by Module::Build::Compat version 0.35 2 3 unless (eval "use Module::Build::Compat 0.02; 1" ) { 4 print "This module requires Module::Build to install itself.\n"; 5 6 require ExtUtils::MakeMaker; 7 my $yn = ExtUtils::MakeMaker::prompt 8 (' Install Module::Build now from CPAN?', 'y'); 9 10 unless ($yn =~ /^y/i) { 11 die " *** Cannot install without Module::Build. Exiting ...\n"; 12 } 13 14 require Cwd; 15 require File::Spec; 16 require CPAN; 17 18 # Save this 'cause CPAN will chdir all over the place. 19 my $cwd = Cwd::cwd(); 20 21 CPAN::Shell->install('Module::Build::Compat'); 22 CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate 23 or die "Couldn't install Module::Build, giving up.\n"; 24 25 chdir $cwd or die "Cannot chdir() back to $cwd: $!"; 26 } 27 eval "use Module::Build::Compat 0.02; 1" or die $@; 28 29 Module::Build::Compat->run_build_pl(args => \@ARGV); 30 my $build_script = 'Build'; 31 $build_script .= '.com' if $^O eq 'VMS'; 32 exit(0) unless(-e $build_script); # cpantesters convention 33 require Module::Build; 34 Module::Build::Compat->write_makefile(build_class => 'Module::Build'); 35