| blib/lib/App/Grok/Parser/Pod5.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 12 | 41.6 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 0 | 2 | unless defined $form |
| 31 | 0 | 2 | if $@ |
| 35 | 0 | 2 | unless open my $out_fh, '>', \$done |
| 37 | 0 | 2 | if ($form eq 'Pod::Perldoc::ToPod') { } |
| 44 | 2 | 0 | if $form ne 'Pod::Perldoc::ToPod' |
| 55 | 0 | 0 | unless open my $handle, '<', \$string |