use strict;
use Module::Build;
print << 'HERE';
This Makefile.PL of CPAN::Test::Dummy::Perl5::Make::FailLate
demonstrates what happens when a distribution dies during
'make' or 'Build'.
This can be avoided by touching a file 'SURVIVE' in the current
directory.
HERE
my $class = Module::Build->subclass(
class => "Module::Build::FailLate",
code => <<'SUBCLASS', );
sub ACTION_build {
die "Problem making this distribution" unless -e 'SURVIVE';
}
SUBCLASS
$class->new(
module_name => "CPAN::Test::Dummy::Perl5::Make::FailLate",
dist_author => 'David A. Golden <dagolden@cpan.org>',
PL_files => { 'Die.PL' => 'impossible_file.pm' },
license => 'perl',
create_readme => 1,
)->create_build_script;