File Coverage

_build/lib/MyModuleBuilder.pm

Criterion	Covered	Total	%
statement	6	19	31.5
branch			n/a
condition			n/a
subroutine	2	4	50.0
pod	0	2	0.0
total	8	25	32.0

package MyModuleBuilder;
use Module::Build;
our @ISA = qw(Module::Build);
use ExtUtils::Manifest qw/maniread maniadd/;
sub ACTION_manifest {
  my $self = shift;
  $self->SUPER::ACTION_manifest;

  my $manifest = maniread;
  my @podpl = grep { /^Gen(.*)\.pod\.PL$/ } keys %$manifest;
  my %pod = map {
      my $file = $_;
      $file =~ s/^Gen(.*)\.PL$/$1/;
      ($file, "Generated Pod") } @podpl;
  maniadd \%pod;
}

sub ACTION_docs {
  my $self = shift;
  $self->process_PL_files;
  $self->SUPER::ACTION_docs;
}

1;