use strict;
use Module::Build;
my $class = Module::Build->subclass(
class => 'Module::Build::Custom',
code => <<'ENDSUB' );
sub ACTION_test {
my $self = shift;
require File::Spec;
$self->run_perl_script(File::Spec->catfile(qw/test Tester.pl/))
or die "Tests no good!\n";
}
ENDSUB
$class->new(
module_name => 'Bogus::Module',
dist_author => 'David A. Golden <dagolden@cpan.org>',
create_makefile_pl => 'traditional',
)->create_build_script;