Dist::Inkt::Role::Test - run various tests on a distribution at build time

       Toby Inkster <tobyink@cpan.org>.

       Please report any bugs to <http://rt.cpan.org/Dist/Display.html?Queue=Dist-Inkt-Role-Test>.

       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 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.

       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.

perl v5.40.1                                       2025-08-06                        Dist::Inkt::Role::Test(3pm)

       Dist::Inkt::Role::Test - run various tests on a distribution at build time

       Dist::Inkt.

          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;