| line |
true |
false |
branch |
|
59
|
2119 |
134 |
unless $field =~ s/_pkg$//
|
|
61
|
0 |
134 |
unless eval "require $subpkg"
|
|
63
|
127 |
7 |
if ($subpkg->isa('App::Followme::ConfiguredObject')) { }
|
|
|
7 |
0 |
elsif ($subpkg->can('new')) { }
|
|
82
|
1368 |
0 |
if (defined $configuration)
|
|
87
|
354 |
8208 |
if ref $configuration->{$field}
|
|
88
|
2853 |
5355 |
if exists $parameters{$field}
|
|
107
|
2420 |
4 |
unless @configuration_fields
|
|
116
|
0 |
7 |
if ($pkg_field ne $subfield)
|
|
122
|
4 |
0 |
if ($match)
|
|
145
|
63 |
621 |
unless %configuration
|
|
146
|
0 |
684 |
if $cycle->{$pkg}
|
|
155
|
2112 |
684 |
if length $value
|
|
163
|
460 |
224 |
if defined &{"${pkg}::setup";}
|