| 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} |