use strict; use Module::Build; my $class = Module::Build->subclass( subclass => "FixedMB", code => <<'SUBCLASS' ); sub ACTION_build { eval "require File::Spec 9999.99" or die $@; } SUBCLASS $class->new( module_name => 'Bogus::Module', dist_author => 'David A. Golden ', PL_files => { 'Die.PL' => 'impossible_file.pm' }, requires => { 'File::Spec' => 9999.99 }, )->create_build_script;