File Coverage

examples/Level2.pm
Criterion Covered Total %
statement 14 15 93.3
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 19 21 90.4


line stmt bran cond sub pod time code
1             package Level2;
2 1     1   274 use strict;
  1         1  
  1         20  
3 1     1   3 use warnings;
  1         1  
  1         19  
4             use lib
5 1         4 '../lib',
6             'lib',
7 1     1   3 ;
  1         0  
8 1     1   117 use Level3;
  1         2  
  1         70  
9             #~ print Level3->check_return . "\n"; # expose this line to see the Level3 behaviour with no source filter
10              
11             sub check_return{
12 1     1 0 5 my $return = Level3->check_return . ' - ';
13             ###SpecialCase return $return . 'Level2 SpecialCase uncovered';
14 1         3 ###Health return $return . 'Level2 Healing uncovered';
15 0           return $return . 'No Level2 uncovering occured';
16             }
17              
18             1;