| blib/lib/Fuckin/Lazy.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 8 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 34 | 0 | 4 | unless open my $fh, '<', $file |
| 39 | 4 | 80 | if ($line =~ /(LAZY|Fuckin'Lazy|Fuckin::Lazy)\s*\(/) |
| 41 | 0 | 4 | unless $line =~ /$match\(\s*\$[0-9A-Za-z_]+\s*\)/ |
| 51 | 0 | 4 | unless open $fh, '>', $file |