| blib/lib/Acme/SafetyGoggles.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 4 | 2 | if length $_ |
| 75 | 0 | 2 | if ($file eq '-e') |
| 81 | 0 | 2 | unless (open $vh, '<', $file) |
| 88 | 0 | 29 | if $line =~ /^__END__$/ |
| 91 | 2 | 27 | if $line =~ /^use\s+Acme::SafetyGoggles\b/ |
| 114 | 1 | 1 | if ($diff) { } |