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 1     1   354 use strict;
  1         2  
  1         29  
4 1     1   5 use warnings;
  1         1  
  1         22  
5 1     1   4 use File::Spec ();
  1         2  
  1         17  
6 1     1   4 use parent qw( My::ConfigPl );
  1         2  
  1         4  
7              
8 2     2 0 473 sub dir { File::Spec->catdir( qw( _mm )) }
9 2     2 0 19 sub file { File::Spec->catfile( shift->dir, qw( config.pl )) }
10              
11             1;