| line |
true |
false |
branch |
|
119
|
0 |
19 |
unless defined $to |
|
181
|
10 |
16 |
if $package =~ /$qr/u |
|
182
|
6 |
10 |
unless $retval |
|
215
|
23 |
68 |
if (XXX or my $is_subform = $def->is_subform) { } |
|
225
|
19 |
4 |
if ($is_subform) { } |
|
230
|
6 |
13 |
unless $self->_inherit_optargs($addons->{'package'}) |
|
232
|
0 |
13 |
if (defined(my $name = +($addons->{'optargs'} // {})->{'name'})) |
|
235
|
0 |
0 |
if (my(@fixup) = @$opt_path) { } |
|
256
|
0 |
68 |
unless defined(my $orig_optargs = $addons->{'optargs'}) |
|
259
|
0 |
68 |
unless defined $orig_optargs->{'spec'} |
|
293
|
0 |
68 |
if (defined(my $old_rename = $rename->{$fq_option_name})) |
|
299
|
2 |
66 |
if $optargs->{'show_default'} and $def->has_default |
|
302
|
50 |
18 |
if $self->_inherit_optargs($addons->{'package'}) |
|
316
|
0 |
2 |
if $order == 0 |
|
328
|
0 |
33 |
if defined $optargs->{'spec'} |
|
330
|
31 |
2 |
if $self->inherit_required |
|
340
|
0 |
17 |
/^--/u ? : |
|
350
|
0 |
14 |
unless defined $field and $field->isa("Form::Tiny::FieldDefinition") and $field->has_type |
|
361
|
2 |
12 |
if $type->name eq "Any" |
|
364
|
12 |
9 |
if exists $$type_set{$type->name} |