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 ) {
my
$cwd
= cwd();
my
$makefile
= File::Spec->rel2abs($0);
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;