| blib/lib/Getopt/Long/Subcommand.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 15 | 28 | 53.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 115 | 6 | 0 | 34 | $cmdspec->{'subcommands'} && keys %{$$cmdspec{'subcommands'};} |
| 256 | 0 | 0 | 0 | $type eq 'arg' and $args{'argpos'} < @{$res->{'comp_subcommand_names'} // [];} |
| line | l | !l | condition |
|---|---|---|---|
| 60 | 1 | 39 | $configure // ['no_ignore_case', 'no_getopt_compat', 'gnu_compat', 'bundling'] |
| 98 | 22 | 18 | $res //= {'success', undef} |
| 99 | 22 | 18 | $stash //= {'path', '', 'level', 0} |
| 129 | 0 | 0 | $res->{'comp_ospec'} //= {} |
| 144 | 16 | 18 | $res->{'subcommand'} //= [] |
| 182 | 22 | 5 | $res->{'success'} //= 1 |
| 251 | 0 | 0 | $args{'word'} // '' |
| 257 | 0 | 0 | $res->{'comp_subcommand_names'} // [] |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 117 | 34 | 0 | 6 | $has_subcommands || $is_completion |
| 205 | 0 | 0 | 18 | $ENV{'COMP_LINE'} or $ENV{'COMMAND_LINE'} |