File Coverage

inc/MyBuilder.pm
Criterion Covered Total %
statement 3 7 42.8
branch n/a
condition n/a
subroutine 1 2 50.0
pod 0 1 0.0
total 4 10 40.0


line stmt bran cond sub pod time code
1             package MyBuilder;
2              
3 1     1   107531 use base qw(Module::Build);
  1         14  
  1         415  
4              
5             sub get_metadata {
6 0     0 0   my $self = shift;
7 0           my $data = $self->SUPER::get_metadata(@_);
8              
9 0           delete $data->{provides}{UNIVERSAL};
10 0           return $data;
11             }
12              
13             1;