| blib/lib/MCP/Run.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 61 | 2 | 2 | if (my $allowed = $self->allowed_commands) |
| 63 | 1 | 1 | unless ($first_word and grep {$_ eq $first_word;} @$allowed) |
| 77 | 0 | 0 | ref $class_or_self ? : |
| 96 | 0 | 5 | if ($compress) |
| 102 | 4 | 1 | if length $stdout |
| 103 | 1 | 4 | if length $stderr |
| 104 | 1 | 4 | if defined $error |
| 106 | 1 | 4 | $exit_code != 0 ? : |