| line |
true |
false |
branch |
|
49
|
8 |
551 |
ref $item eq 'HASH' ? :
|
|
104
|
7 |
569 |
if defined $reg_values->{$warper_name}
|
|
115
|
87 |
1188 |
unless (defined $obj)
|
|
124
|
482 |
706 |
if ($obj->isa("Config::Model::Value") or $obj->isa("Config::Model::CheckList"))
|
|
126
|
37 |
445 |
if (defined $warped_node)
|
|
134
|
124 |
582 |
if ($obj->isa("Config::Model::WarpedNode"))
|
|
136
|
0 |
124 |
if (defined $warped_node)
|
|
146
|
0 |
482 |
if (defined $warper and scalar @command)
|
|
154
|
482 |
87 |
defined $warper ? :
|
|
160
|
87 |
482 |
unless defined $warper
|
|
162
|
0 |
482 |
unless $warper->isa("Config::Model::Value") or $obj->isa("Config::Model::CheckList")
|
|
177
|
1 |
481 |
if ($type eq "computed")
|
|
230
|
473 |
89 |
if (defined $warper and $warper->get_type eq 'leaf') { }
|
|
|
2 |
87 |
elsif (defined $warper and $warper->get_type eq 'check_list') { }
|
|
|
0 |
87 |
elsif (defined $warper) { }
|
|
238
|
0 |
2 |
if ($logger->is_debug)
|
|
271
|
0 |
0 |
@_ ? :
|
|
278
|
0 |
0 |
unless defined $warped
|
|
281
|
0 |
0 |
defined $value ? :
|
|
298
|
438 |
0 |
ref $rules_ref eq 'ARRAY' ? :
|
|
|
0 |
438 |
ref $rules_ref eq 'HASH' ? :
|
|
310
|
0 |
1385 |
ref $key_set ? :
|
|
313
|
1 |
1384 |
unless ref $v eq "HASH"
|
|
325
|
0 |
1428 |
unless &any(sub {
|
|
331
|
0 |
1 |
ref $_ ? :
|
|
344
|
11 |
743 |
if (defined $warped_object->index_value)
|
|
353
|
76 |
667 |
if (defined $v) { }
|
|
380
|
340 |
0 |
if (@_)
|
|
382
|
338 |
2 |
defined $value ? :
|
|
403
|
485 |
74 |
$old ? :
|
|
|
544 |
15 |
$new ? :
|
|
|
310 |
235 |
if $old ? 1 : 0 xor $new ? 1 : 0 or $old and $new and $new ne $old
|
|
408
|
30 |
310 |
if ($same)
|
|
410
|
0 |
30 |
if ($logger->is_debug)
|
|
458
|
0 |
1618 |
if ($@)
|
|
465
|
333 |
1285 |
$ret ? :
|
|
483
|
1285 |
1618 |
if ref $bool_expr
|
|
485
|
1285 |
333 |
unless $res
|
|
494
|
7 |
747 |
if ($logger->is_info)
|
|
495
|
7 |
0 |
defined $_ ? :
|
|
497
|
1 |
6 |
scalar %$found_rule ? :
|
|
519
|
1 |
753 |
if ($@)
|
|
520
|
1 |
0 |
defined $_ ? :
|
|
522
|
1 |
0 |
ref $e ? :
|
|
543
|
7 |
0 |
unless defined $self->{'warp'}
|
|
549
|
0 |
0 |
ref $follow eq 'HASH' ? :
|
|
|
0 |
0 |
ref $follow eq 'ARRAY' ? :
|
|
554
|
0 |
0 |
@warper_paths > 1 ? :
|
|
572
|
0 |
0 |
if (ref $e eq $expected_error)
|
|
577
|
0 |
0 |
unless defined $warper_value
|
|
581
|
0 |
0 |
$warper->{'value_type'} eq 'boolean' ? :
|
|
|
0 |
0 |
defined $warper->choice ? :
|
|
588
|
0 |
0 |
$warper->{'value_type'} =~ /^[aeiou]/ ? :
|
|
590
|
0 |
0 |
@try ? :
|
|
597
|
0 |
0 |
if (defined $warper->{'compute'})
|
|
602
|
0 |
0 |
if $logger->is_debug
|