The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

use 5.006002;
use strict;
use lib qw{ inc };
( my $mmv = ExtUtils::MakeMaker->VERSION ) =~ s/_//g;
my $meta = My::Module::Meta->new();
my %args = (
ABSTRACT => $meta->abstract(),
AUTHOR => $meta->author(),
DISTNAME => $meta->dist_name(),
EXE_FILES => $meta->script_files(),
NAME => $meta->module_name(),
PREREQ_PM => $meta->requires(),
PL_FILES => {}, # Prevent old MakeMaker from running Build.PL
realclean => {
FILES => join( ' ', @{ $meta->add_to_cleanup() } ),
},
VERSION_FROM => $meta->version_from(),
);
$mmv >= 6.31
and $args{LICENSE} = $meta->license();
if ( $mmv >= 6.4501 ) {
$args{META_ADD} = {
no_index => $meta->no_index(),
$meta->provides(),
};
$args{META_MERGE} = $meta->meta_merge();
}
$mmv >= 6.4701
and $args{MIN_PERL_VERSION} = $meta->requires_perl();
if ( $mmv >= 6.52 ) {
$args{BUILD_REQUIRES} = $meta->build_requires();
$args{CONFIGURE_REQUIRES} = $meta->configure_requires();
} elsif ( $mmv >= 6.5501 ) {
$args{BUILD_REQUIRES} = $meta->build_requires();
$args{META_MERGE}{configure_requires} = $meta->configure_requires();
} elsif ( $mmv >= 6.4501 ) {
$args{META_MERGE}{build_requires} = $meta->build_requires();
$args{META_MERGE}{configure_requires} = $meta->configure_requires();
} else {
foreach my $method ( qw{ configure_requires build_requires } ) {
my $req = $meta->$method();
foreach my $key ( keys %{ $req } ) {
exists $args{PREREQ_PM}{$key}
or $args{PREREQ_PM}{$key} = $req->{$key};
}
}
}
WriteMakefile( %args );
sub MY::postamble {
my ( $self, @args ) = @_;
my $authortest = $self->test_via_harness(
'$(FULLPERLRUN)', '$(AUTHORTEST_FILES)' );
$authortest =~ s/ \s+ \z //smx;
$authortest =~ s/ \A \s+ //smx;
chomp $authortest;
return <<"EOD";
AUTHORTEST_FILES = t/*.t xt/author/*.t
authortest :: pure_all
AUTHOR_TESTING=1 $authortest
testcover :: pure_all
cover -test
EOD
}
sub provides {
-d 'lib'
or return;
local $@ = undef;
my $provides = eval {
Module::Metadata->provides( version => 2, dir => 'lib' );
} or return;
return ( provides => $provides );
}
# ex: set textwidth=72 :