| Dist::Inkt::Role::Test(3pm) | User Contributed Perl Documentation | Dist::Inkt::Role::Test(3pm) |
Dist::Inkt::Role::Test - run various tests on a distribution at build time
package Dist::Inkt::Profile::JOEBLOGGS;
use Moose;
extends qw(Dist::Inkt);
with (
...,
"Dist::Inkt::Role::Test",
...,
);
after BUILD => sub {
my $self = shift;
# Run a test before attempting to build
# the dist dir.
#
$self->setup_prebuild_test(sub {
die "rude!" if $self->name =~ /Arse/;
});
# Run a test after building the dist dir.
#
$self->setup_build_test(sub {
die "missing change log" unless -f "Changes";
});
# Run a test after tarballing the dist dir.
#
$self->setup_tarball_test(sub {
my $tarball = $_[1]
die "too big" if $tarball->stat->size > 1_000_000;
});
};
1;
This role exists to provide hooks for Dist::Inkt subclasses and other roles to run tests.
Bundled with this role are a few other roles that consume it in useful ways.
Please report any bugs to <http://rt.cpan.org/Dist/Display.html?Queue=Dist-Inkt-Role-Test>.
Dist::Inkt.
Toby Inkster <tobyink@cpan.org>.
This software is copyright (c) 2014 by Toby Inkster.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
| 2024-03-05 | perl v5.38.2 |