| blib/lib/YATT/Lite/Util/CmdLine.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 13 | 29 | 44.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 17 | 3 | 2 | 11 | @$list and my($n, $v) = $list->[0] =~ /^--$ | ^(?:--? ([\w:\-\.]+) (?: =(.*))?)$/sx |
| 21 | 8 | 1 | 1 | $alias and $alias->{$n} |
| 29 | 0 | 1 | 5 | $wantarray && ref $result ne 'HASH' |
| 41 | 2 | 1 | 5 | @$list and $list->[0] =~ /^([^=]+)=(.*)/s |
| 44 | 0 | 0 | 3 | not $explicit and wantarray |
| 81 | 0 | 0 | 0 | @res == 1 and not $res[0] |
| 0 | 0 | 0 | @res == 1 and defined $res[0] | |
| 0 | 0 | 0 | @res == 1 and defined $res[0] and $res[0] eq 1 |
| line | l | !l | condition |
|---|---|---|---|
| 64 | 1 | 0 | shift @$list || 'help' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 81 | 0 | 0 | 0 | not @res or @res == 1 and not $res[0] |