| blib/lib/YA/CLI.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 17 | 20 | 85.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 38 | 4 | 1 | 10 | @$args and not $args->[0] =~ /^--/ |
| 41 | 5 | 2 | 8 | $action and @$args |
| 7 | 4 | 4 | $action and @$args and not $args->[0] =~ /^--/ | |
| 66 | 0 | 9 | 4 | $handler and defined $subaction |
| 9 | 3 | 1 | $handler and defined $subaction and not $handler->can("subaction") |
| line | l | !l | condition |
|---|---|---|---|
| 33 | 15 | 0 | $args //= \@ARGV |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 45 | 10 | 5 | 0 | $action //= $class->default_handler |