| line |
true |
false |
branch |
|
60
|
0 |
4 |
if $self->{'dedup'}{$cb}++ |
|
68
|
0 |
0 |
unless $other |
|
69
|
0 |
0 |
if $self->{'dedup'}{$other}++ |
|
73
|
0 |
0 |
if (my $other_include = $other->included) |
|
79
|
0 |
0 |
if ($list) { } |
|
81
|
0 |
0 |
unless $want{$_->title} or $want{$_->field} |
|
102
|
0 |
15 |
if $self->{'dedup'}{$option}++ |
|
121
|
0 |
0 |
if $old_key == $new_key |
|
133
|
0 |
0 |
if $self->option_groups->{$name} |
|
142
|
0 |
0 |
if ($in_options) { } |
|
149
|
0 |
0 |
if $self->{'options_groups_cache'} and $self->check_cache |
|
155
|
0 |
0 |
if $in_options |
|
164
|
64 |
0 |
if ($in_options) { } |
|
171
|
0 |
0 |
if $self->{'options_map_cache'} and $self->check_cache |
|
181
|
0 |
452 |
if $option->can("custom_matches") |
|
185
|
0 |
1435 |
if (my $existing = $map->{$form}) |
|
186
|
0 |
0 |
if $existing ne $option |
|
194
|
64 |
0 |
if $in_options |
|
202
|
0 |
64 |
unless $args and ref $args eq "ARRAY" |
|
209
|
64 |
0 |
if $stops and ref $stops eq "ARRAY" |
|
227
|
475 |
0 |
unless (defined ${$ref;}) |
|
230
|
329 |
146 |
if (not defined $val) { } |
|
|
86 |
60 |
elsif ($rt) { } |
|
234
|
32 |
54 |
$rt eq 'ARRAY' ? : |
|
255
|
0 |
0 |
if $arg eq $end |
|
257
|
0 |
0 |
if (my $nest = $groups->{$arg}) |
|
271
|
0 |
64 |
if (my $end = $groups->{$base}) |
|
276
|
1 |
63 |
if ($stops->{$base}) |
|
281
|
3 |
60 |
unless ($base =~ /^-/) |
|
282
|
0 |
3 |
if ($params{'stop_at_non_opts'}) |
|
287
|
1 |
2 |
if ($params{'skip_non_opts'}) |
|
297
|
33 |
27 |
if ($base =~ /^(-[^-])(=?)(.*)$/) { } |
|
301
|
33 |
0 |
if ($opt = $map->{$first}) |
|
302
|
10 |
23 |
if ($opt->allows_shortval and $set || $other) { } |
|
|
4 |
19 |
elsif ($set) { } |
|
310
|
3 |
16 |
if $other |
|
319
|
2 |
58 |
unless ($opt) |
|
320
|
2 |
0 |
if (my $list = $map->{'custom_match'}) |
|
323
|
0 |
0 |
unless $opt |
|
330
|
0 |
60 |
if $set and not defined $arg |
|
333
|
2 |
58 |
unless ($opt) |
|
334
|
1 |
1 |
if ($params{'skip_invalid_opts'}) |
|
339
|
0 |
1 |
if ($params{'stop_at_invalid_opts'}) |
|
347
|
1 |
57 |
if $set and not $opt->allows_arg |
|
352
|
1 |
56 |
unless $opt->no_module |
|
359
|
12 |
45 |
if ($delta < 0) |
|
363
|
12 |
0 |
unless $set |
|
366
|
6 |
39 |
if $state->{'cleared'}{$group_name} |
|
368
|
9 |
36 |
if ($opt->requires_arg and not $set) |
|
369
|
1 |
8 |
unless @$argv |
|
373
|
23 |
21 |
if ($arg) |
|
374
|
0 |
23 |
if (my $end = $groups->{$arg}) |
|
379
|
0 |
0 |
if (ref $arg and @$arg > 1 and not $opt->allows_list) |
|
385
|
24 |
20 |
if (defined $arg) { } |
|
|
7 |
13 |
elsif ($opt->allows_autofill) { } |
|
387
|
0 |
24 |
ref $arg ? : |
|
398
|
0 |
44 |
if ($opt->mod_adds_options) |
|
401
|
0 |
0 |
if ($class->can("options")) |
|
402
|
0 |
0 |
if (my $add = $class->options) |
|
410
|
0 |
44 |
if (@bad) |
|
411
|
0 |
0 |
defined $_ ? : |
|
423
|
10 |
62 |
if $state->{'cleared'} and $state->{'cleared'}{$group_name} and $state->{'cleared'}{$group_name}{$field_name} |
|
424
|
83 |
354 |
if $opt->is_populated($ref) |
|
428
|
59 |
0 |
unless ($params{'skip_posts'}) |
|
431
|
0 |
12 |
if $set->{'applicable'} and not $set->{'applicable'}->($set, $self, $settings) |
|
443
|
12 |
0 |
unless $params{'no_set_env'} |
|
448
|
80 |
367 |
unless $opt->can_set_env |
|
450
|
355 |
12 |
unless my $to_set = $opt->set_env_vars |
|
451
|
0 |
12 |
unless @$to_set |
|
453
|
3 |
9 |
unless $opt->is_populated($ref) |
|
459
|
0 |
9 |
unless my(@val) = $opt->get_env_value($env, $ref) |
|
460
|
0 |
9 |
if (@val > 1) |
|
467
|
1 |
1 |
$setval ? : |
|
|
2 |
7 |
if $neg |
|
470
|
9 |
0 |
unless $params{'no_set_env'} |
|
501
|
28 |
0 |
unless $params{'applicable'} |
|
504
|
0 |
2 |
unless my $fset = $DOC_FORMATS{$format} |
|
507
|
0 |
2 |
unless $opts |
|
508
|
0 |
2 |
unless @$opts |
|
512
|
0 |
2 |
if $params{'group'} |
|
514
|
0 |
2 |
unless @render |
|
523
|
2 |
26 |
if (not $cat or $opt->category ne $cat) |
|
547
|
0 |
74 |
if ($params{'group_first'}) { } |