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