| line |
true |
false |
branch |
|
139
|
0 |
20 |
unless defined $to |
|
201
|
10 |
16 |
if $package =~ /$qr/u |
|
202
|
6 |
10 |
unless $retval |
|
235
|
23 |
69 |
if (XXX or my $is_subform = $def->is_subform) { } |
|
245
|
19 |
4 |
if ($is_subform) { } |
|
250
|
6 |
13 |
unless $self->_inherit_optargs($addons->{'package'}) |
|
252
|
0 |
13 |
if (defined(my $name = +($addons->{'optargs'} // {})->{'name'})) |
|
255
|
0 |
0 |
if (my(@fixup) = @$opt_path) { } |
|
276
|
0 |
69 |
unless defined(my $orig_optargs = $addons->{'optargs'}) |
|
279
|
0 |
69 |
unless defined $orig_optargs->{'spec'} |
|
313
|
0 |
69 |
if (defined(my $old_rename = $rename->{$fq_option_name})) |
|
319
|
2 |
67 |
if $optargs->{'show_default'} and $def->has_default |
|
322
|
51 |
18 |
if $self->_inherit_optargs($addons->{'package'}) |
|
336
|
0 |
2 |
if $order == 0 |
|
348
|
0 |
34 |
if defined $optargs->{'spec'} |
|
350
|
32 |
2 |
if $self->inherit_required |
|
360
|
0 |
17 |
/^--/u ? : |
|
370
|
0 |
15 |
unless defined $field and $field->isa("Form::Tiny::FieldDefinition") and $field->has_type |
|
381
|
6 |
9 |
if index("|Any|Path|File|Dir|", "|" . $type->name . "|") != -1 |
|
384
|
9 |
6 |
if exists $$type_set{$type->name} |