use Cwd;
unless ( eval "use Module::Build::Compat 0.2; 1" ) {
print "This module require Module::Build to install itself.\n";
my $yn = ExtUtils::MakeMaker::prompt( ' Install Module::Build from CPAN',
'y' );
if ( $yn =~ /^y(es)?/i ) {
# save this cause CPAN will chdir all over the place.
my $cwd = cwd();
my $makefile = File::Spec->rel2abs($0);
require CPAN;
CPAN->install('Module::Build');
chdir $cwd
or die "Cannot chdir to $cwd: $!";
exec( $^X, $makefile, @ARGV );
}
else {
warn "Cannot install this module "
. "without Module::Build. Exiting ...\n";
exit 0;
}
}
Module::Build::Compat->run_build_pl( args => \@ARGV );
Module::Build::Compat->write_makefile;