line |
true |
false |
branch |
43
|
0 |
0 |
if wantarray |
44
|
0 |
0 |
if (@$args) |
70
|
6 |
20 |
if (ref $_[0]) |
72
|
6 |
0 |
if (&Scalar::Util::reftype($_[0]) eq 'HASH') |
81
|
0 |
26 |
if ($Getopt::Long::auto_help) |
90
|
0 |
26 |
if ($Getopt::Long::auto_version) |
107
|
51 |
22 |
unless (ref $e eq 'Getopt::Long::More::OptSpec') |
112
|
8 |
14 |
unless exists $e->{'handler'} |
114
|
3 |
11 |
if ($prev eq '<>') { } |
130
|
0 |
26 |
if ($ENV{'COMP_SHELL'}) { } |
|
0 |
26 |
elsif ($ENV{'COMMAND_LINE'}) { } |
138
|
0 |
26 |
if ($ENV{'COMP_LINE'} or $ENV{'COMMAND_LINE'}) |
140
|
0 |
0 |
if ($ENV{'COMP_LINE'}) { } |
|
0 |
0 |
elsif ($ENV{'COMMAND_LINE'}) { } |
153
|
0 |
0 |
if ($i % 2 == 0) |
156
|
0 |
0 |
if (ref $os eq 'Getopt::Long::More::OptSpec') |
158
|
0 |
0 |
unless $completion |
159
|
0 |
0 |
if (ref $completion eq 'ARRAY') |
169
|
0 |
0 |
if ($o eq '<>') { } |
180
|
0 |
0 |
if ($args{'type'} eq 'optval' and $opt_completions{$args{'ospec'}}) { } |
|
0 |
0 |
elsif ($args{'type'} eq 'arg' and $arg_completion) { } |
196
|
0 |
0 |
if ($shell eq 'bash') { } |
|
0 |
0 |
elsif ($shell eq 'fish') { } |
|
0 |
0 |
elsif ($shell eq 'tcsh') { } |
|
0 |
0 |
elsif ($shell eq 'zsh') { } |
223
|
22 |
51 |
if ($i > 0 and ref $_ eq 'Getopt::Long::More::OptSpec') |
227
|
8 |
14 |
if ($_->{'required'}) |
228
|
4 |
4 |
if ($osname eq '<>') { } |
|
2 |
2 |
elsif (exists $_->{'handler'}) { } |
229
|
2 |
2 |
if ($has_arg_handler) { } |
230
|
1 |
1 |
unless ($arg_handler_accessed) |
234
|
1 |
1 |
unless (@{$ary;}) |
239
|
1 |
1 |
if (ref $_->{'handler'} eq 'SCALAR' and not defined ${$$_{'handler'};}) { } |
|
0 |
1 |
elsif (ref $_->{'handler'} eq 'ARRAY' and not @{$_->{'handler'};}) { } |
|
0 |
2 |
elsif (ref $_->{'handler'} eq 'HASH' and not keys %{$$_{'handler'};}) { } |
257
|
5 |
12 |
if (defined $_->{'default'}) |
258
|
1 |
4 |
if ($osname eq '<>') { } |
|
2 |
2 |
elsif (exists $_->{'handler'}) { } |
261
|
1 |
1 |
if (ref $_->{'handler'} eq 'SCALAR' and not defined ${$$_{'handler'};}) { } |
|
0 |
1 |
elsif (ref $_->{'handler'} eq 'ARRAY' and not @{$_->{'handler'};}) { } |
|
0 |
2 |
elsif (ref $_->{'handler'} eq 'HASH' and not keys %{$$_{'handler'};}) { } |
285
|
0 |
0 |
@_ ? : |
290
|
0 |
0 |
if ($i % 2 == 0) |
293
|
0 |
0 |
if $osname eq '<>' |
296
|
0 |
0 |
length $oname > 1 ? : |
300
|
0 |
0 |
if $max_opt_spec_len < $len |
302
|
0 |
0 |
if (ref $os eq 'Getopt::Long::More::OptSpec') |
304
|
0 |
0 |
if $os->{'required'} |
318
|
0 |
0 |
$_->[3] ? : |
|
0 |
0 |
defined $_->[4] ? : |
330
|
0 |
0 |
@_ ? : |
334
|
0 |
0 |
if ($i % 2 == 0) |
337
|
0 |
0 |
if $osname eq '<>' |
340
|
0 |
0 |
length $oname > 1 ? : |
344
|
0 |
0 |
if (ref $os eq 'Getopt::Long::More::OptSpec') |
347
|
0 |
0 |
if $os->{'required'} |
358
|
0 |
0 |
if ($_->[3]) |
359
|
0 |
0 |
if (defined $_->[4]) |
360
|
0 |
0 |
@notes ? : |
361
|
0 |
0 |
if length $_->[1] |
362
|
0 |
0 |
if length $_->[2] |
376
|
4 |
30 |
if /\A(x|x\..+|_.*)\z/ |
377
|
2 |
28 |
unless (/\A(handler|required|default|summary|description|completion)\z/) |