| blib/lib/Pod/ToDemo.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 13 | 1 | 3 | unless $action |
| 18 | 1 | 2 | if @command and $command[1] ne '-e' |
| 20 | 1 | 1 | defined &$action ? : |
| 45 | 1 | 3 | unless $filename |
| 46 | 1 | 2 | if -e $filename |
| 48 | 0 | 2 | unless open my $out, '>', $filename |