Branch Coverage

lib/Su/Process.pm
Criterion Covered Total %
branch 46 68 67.6


line true false branch
83 46 22 if @_
104 3 18 if $base
105 3 18 if $dir
107 4 17 if ($base or $dir) { }
125 0 0 if ref $_[0] eq 'Su::Process'
126 0 0 if ($self) { }
146 3 2 if ref $_[0] eq 'Su::Process'
147 3 2 $$self{'base'} ? :
148 0 5 $$self{'dir'} ? :
155 3 2 if (scalar @arr > 1)
162 3 2 if ($comp_id =~ /::/) { }
169 1 4 unless -d $dir
173 0 5 unless (-d $dir)
183 3 2 if ($comp_id =~ /::/) { }
193 0 5 $gen_type ? :
196 0 5 if $@
199 5 0 if ($ret == 1) { }
219 0 5 if ref $_[0] eq 'Su::Process'
317 0 0 if ref $_[0] eq 'Su::Process'
388 0 7 if ref $_[0] eq 'Su::Process'
389 0 7 $$self{'base'} ? :
390 0 7 $$self{'dir'} ? :
399 1 0 if (-f $f and $suffix and $suffix ne '.pm')
418 73 0 if ref $_[0] eq 'Su::Process'
419 19 54 $$self{'base'} ? :
420 51 22 $$self{'dir'} ? :
422 0 73 if @_
442 0 73 if $@ and not $SUPPRESS_LOAD_ERROR
447 18 55 if (exists &{$comp_id . '::new';}) { }
467 0 1 if ref $_[0] eq 'Su::Process'
471 0 1 unless &open($fh, '<', $path)
487 0 17 if ref $_[0] eq 'Su::Process'
491 15 2 if scalar @pass_elem > 1
493 10 7 $ridx == -1 ? :