package Test::XML::Valid::Builder; use Module::Build; @ISA = qw(Module::Build); sub ACTION_dist { my $self = shift; `perldoc -t lib/Test/XML/Valid.pm>README`; $self->SUPER::ACTION_dist; } sub ACTION_cover { my $self = shift; $self->depends_on('build'); system qw( cover -delete ); # sometimes we get failing tests, which makes Test::Harness # die. catch that eval { local $ENV{PERL5OPT} = "-MDevel::Cover=-summary,0"; $self->ACTION_test(@_); }; system qw( cover -report html ); } 1;