line |
true |
false |
branch |
45
|
0 |
0 |
if wantarray |
46
|
0 |
0 |
if (@$args) |
72
|
6 |
20 |
if (ref $_[0]) |
74
|
6 |
0 |
if (&Scalar::Util::reftype($_[0]) eq 'HASH') |
83
|
0 |
26 |
if ($Getopt::Long::auto_help) |
92
|
0 |
26 |
if ($Getopt::Long::auto_version) |
109
|
51 |
22 |
unless (ref $e eq 'Getopt::Long::More::OptSpec') |
114
|
8 |
14 |
unless exists $e->{'destination'} |
116
|
3 |
11 |
if ($prev eq '<>') { } |
132
|
0 |
26 |
if ($ENV{'COMP_SHELL'}) { } |
|
0 |
26 |
elsif ($ENV{'COMMAND_LINE'}) { } |
140
|
0 |
26 |
if ($ENV{'COMP_LINE'} or $ENV{'COMMAND_LINE'}) |
142
|
0 |
0 |
if ($ENV{'COMP_LINE'}) { } |
|
0 |
0 |
elsif ($ENV{'COMMAND_LINE'}) { } |
155
|
0 |
0 |
if ($i % 2 == 0) |
158
|
0 |
0 |
if (ref $os eq 'Getopt::Long::More::OptSpec') |
160
|
0 |
0 |
unless $completion |
161
|
0 |
0 |
if (ref $completion eq 'ARRAY') |
171
|
0 |
0 |
if ($o eq '<>') { } |
182
|
0 |
0 |
if ($args{'type'} eq 'optval' and $opt_completions{$args{'ospec'}}) { } |
|
0 |
0 |
elsif ($args{'type'} eq 'arg' and $arg_completion) { } |
198
|
0 |
0 |
if ($shell eq 'bash') { } |
|
0 |
0 |
elsif ($shell eq 'fish') { } |
|
0 |
0 |
elsif ($shell eq 'tcsh') { } |
|
0 |
0 |
elsif ($shell eq 'zsh') { } |
225
|
22 |
51 |
if ($i > 0 and ref $_ eq 'Getopt::Long::More::OptSpec') |
229
|
8 |
14 |
if ($_->{'required'}) |
230
|
4 |
4 |
if ($osname eq '<>') { } |
|
2 |
2 |
elsif (exists $_->{'destination'}) { } |
231
|
2 |
2 |
if ($has_arg_handler) { } |
232
|
1 |
1 |
unless ($arg_handler_accessed) |
236
|
1 |
1 |
unless (@{$ary;}) |
241
|
1 |
1 |
if (ref $_->{'destination'} eq 'SCALAR' and not defined ${$$_{'destination'};}) { } |
|
0 |
1 |
elsif (ref $_->{'destination'} eq 'ARRAY' and not @{$_->{'destination'};}) { } |
|
0 |
2 |
elsif (ref $_->{'destination'} eq 'HASH' and not keys %{$$_{'destination'};}) { } |
259
|
5 |
12 |
if (defined $_->{'default'}) |
260
|
1 |
4 |
if ($osname eq '<>') { } |
|
2 |
2 |
elsif (exists $_->{'destination'}) { } |
263
|
1 |
1 |
if (ref $_->{'destination'} eq 'SCALAR' and not defined ${$$_{'destination'};}) { } |
|
0 |
1 |
elsif (ref $_->{'destination'} eq 'ARRAY' and not @{$_->{'destination'};}) { } |
|
0 |
2 |
elsif (ref $_->{'destination'} eq 'HASH' and not keys %{$$_{'destination'};}) { } |
287
|
0 |
0 |
@_ ? : |
292
|
0 |
0 |
if ($i % 2 == 0) |
295
|
0 |
0 |
if $osname eq '<>' |
298
|
0 |
0 |
length $oname > 1 ? : |
302
|
0 |
0 |
if $max_opt_spec_len < $len |
304
|
0 |
0 |
if (ref $os eq 'Getopt::Long::More::OptSpec') |
306
|
0 |
0 |
if $os->{'required'} |
320
|
0 |
0 |
$_->[3] ? : |
|
0 |
0 |
defined $_->[4] ? : |
332
|
0 |
0 |
@_ ? : |
336
|
0 |
0 |
if ($i % 2 == 0) |
339
|
0 |
0 |
if $osname eq '<>' |
342
|
0 |
0 |
length $oname > 1 ? : |
346
|
0 |
0 |
if (ref $os eq 'Getopt::Long::More::OptSpec') |
349
|
0 |
0 |
if $os->{'required'} |
360
|
0 |
0 |
if ($_->[3]) |
361
|
0 |
0 |
if (defined $_->[4]) |
362
|
0 |
0 |
@notes ? : |
363
|
0 |
0 |
if length $_->[1] |
364
|
0 |
0 |
if length $_->[2] |
381
|
0 |
28 |
unless shift() |
384
|
56 |
28 |
unless $_ |
391
|
26 |
2 |
unless exists $o{$k} |
393
|
2 |
0 |
defined $canon ? : |
401
|
26 |
2 |
unless exists $o{$k} |
404
|
0 |
2 |
unless defined $canon |
406
|
1 |
1 |
if (exists $o{$canon}) |
413
|
0 |
27 |
wantarray ? : |
428
|
4 |
31 |
if /\A(x|x\..+|_.*)\z/ |
429
|
2 |
29 |
unless (/\A(required|default|summary|description|destination|completion)\z/) |