Branch Coverage

lib/Devel/PerlySense/Util.pm
Criterion Covered Total %
branch 9 12 75.0


line true false branch
54 4 4109267 unless (exists $hArg{$param})
76 2 61 unless open my $fh, '<', $file
94 0 5 unless open my $fh, '>', $file
95 0 5 unless print $fh $text
116 11 448 if ($dir eq '..') { }
148 0 8 unless $$rhParamEnv{$1}