line |
true |
false |
branch |
125
|
0 |
19 |
unless defined $to |
187
|
10 |
16 |
if $package =~ /$qr/u |
188
|
6 |
10 |
unless $retval |
221
|
23 |
68 |
if (XXX or my $is_subform = $def->is_subform) { } |
231
|
19 |
4 |
if ($is_subform) { } |
236
|
6 |
13 |
unless $self->_inherit_optargs($addons->{'package'}) |
238
|
0 |
13 |
if (defined(my $name = +($addons->{'optargs'} // {})->{'name'})) |
241
|
0 |
0 |
if (my(@fixup) = @$opt_path) { } |
262
|
0 |
68 |
unless defined(my $orig_optargs = $addons->{'optargs'}) |
265
|
0 |
68 |
unless defined $orig_optargs->{'spec'} |
299
|
0 |
68 |
if (defined(my $old_rename = $rename->{$fq_option_name})) |
305
|
2 |
66 |
if $optargs->{'show_default'} and $def->has_default |
308
|
50 |
18 |
if $self->_inherit_optargs($addons->{'package'}) |
322
|
0 |
2 |
if $order == 0 |
334
|
0 |
33 |
if defined $optargs->{'spec'} |
336
|
31 |
2 |
if $self->inherit_required |
346
|
0 |
17 |
/^--/u ? : |
356
|
0 |
14 |
unless defined $field and $field->isa("Form::Tiny::FieldDefinition") and $field->has_type |
367
|
2 |
12 |
if $type->name eq "Any" |
370
|
12 |
9 |
if exists $$type_set{$type->name} |