File Coverage

inc/My/BuildConfig.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 2 0.0
total 20 22 90.9


line stmt bran cond sub pod time code
1             package My::BuildConfig;
2              
3 3     3   343 use strict;
  3         4  
  3         84  
4 3     3   13 use warnings;
  3         3  
  3         127  
5 3     3   12 use File::Spec ();
  3         4  
  3         95  
6 3     3   416 use parent qw( My::ConfigPl );
  3         267  
  3         22  
7              
8 6     6 0 1967 sub dir { File::Spec->catdir( qw( _mm )) }
9 6     6 0 20 sub file { File::Spec->catfile( shift->dir, qw( config.pl )) }
10              
11             1;