| blib/script/pod2markdown | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 10 | 60.0 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 0 | 11 | unless &GetOptions(\%opts, ("help|h", "html_encode_chars|html-encode-chars=s", "local_module_url_prefix|local-module-url-prefix=s", "match_encoding|match-encoding|m", "man_url_prefix|man-url-prefix=s", "perldoc_url_prefix|perldoc-url-prefix=s", "output_encoding|output-encoding|e=s", "utf8|utf-8|u")) |
| 36 | 0 | 11 | if $opts{'help'} |
| 41 | 0 | 11 | if delete $opts{'utf8'} |
| 63 | 6 | 16 | if (not defined $path or $path eq '-') { } |
| 64 | 0 | 16 | unless open my $fh, $op, $path |