blib/lib/Getopt/Long/Subcommand.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 15 | 28 | 53.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
113 | 6 | 0 | 34 | $cmdspec->{'subcommands'} && keys %{$$cmdspec{'subcommands'};} |
252 | 0 | 0 | 0 | $type eq 'arg' and $args{'argpos'} < @{$res->{'comp_subcommand_names'} // [];} |
line | l | !l | condition |
---|---|---|---|
58 | 1 | 39 | $configure // ['no_ignore_case', 'no_getopt_compat', 'gnu_compat', 'bundling'] |
96 | 22 | 18 | $res //= {'success', undef} |
97 | 22 | 18 | $stash //= {'path', '', 'level', 0} |
127 | 0 | 0 | $res->{'comp_ospec'} //= {} |
140 | 16 | 18 | $res->{'subcommand'} //= [] |
178 | 22 | 5 | $res->{'success'} //= 1 |
247 | 0 | 0 | $args{'word'} // '' |
253 | 0 | 0 | $res->{'comp_subcommand_names'} // [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
115 | 34 | 0 | 6 | $has_subcommands || $is_completion |
201 | 0 | 0 | 18 | $ENV{'COMP_LINE'} or $ENV{'COMMAND_LINE'} |