lib/CLI/Dispatch.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 6 | 10 | 60.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
128 | 25 | 11 | 20 | $command->isa('CLI::Dispatch::Help') and @ARGV |
line | l | !l | condition |
---|---|---|---|
86 | 18 | 0 | $_ || 'Obscure error' |
143 | 0 | 0 | $_ || 'Obscure error' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
21 | 47 | 7 | 0 | shift @ARGV || $self->default_command |