| line |
true |
false |
branch |
|
259
|
12 |
23 |
$checks ? : |
|
318
|
1 |
28 |
unless ref $self |
|
319
|
0 |
28 |
unless @checks |
|
322
|
12 |
16 |
if @checks == 1 and (ref $checks[0] || '') eq 'ARRAY' |
|
337
|
0 |
24 |
$type eq 'ARRAY' ? : |
|
|
20 |
24 |
$type eq 'HASH' ? : |
|
341
|
3 |
41 |
unless $c{'check'} |
|
345
|
13 |
28 |
unless ((ref $c{'check'} || '') eq 'CODE') |
|
350
|
4 |
7 |
if ($c{'check'} and not $c{'invocant'} and do {
local $@;
eval {
do {
local $SIG{'__DIE__'};
$c{'check'}->can('check')
}
}
}) |
|
361
|
7 |
6 |
unless ($c{'invocant'}) |
|
364
|
4 |
3 |
if ($caller->can($c{'check'})) { } |
|
373
|
2 |
8 |
unless $c{'invocant'}->can($c{'check'}) |
|
416
|
1 |
26 |
unless ref $self |
|
417
|
1 |
25 |
unless $registered_checks{$self} |
|
|
1 |
25 |
unless @{[] unless $registered_checks{$self};} |
|
425
|
20 |
5 |
unless exists $params{'summarize_result'} |
|
445
|
15 |
26 |
$i ? : |
|
446
|
1 |
40 |
if $@ and not @r |
|
452
|
8 |
2 |
@r % 2 == 0 ? : |
|
|
31 |
10 |
@r == 1 && ref $r[0] eq 'HASH' ? : |
|
453
|
1 |
1 |
$i ? : |
|
458
|
39 |
2 |
if (@r) |
|
463
|
0 |
25 |
unless $registered_checks{$self} |
|
465
|
1 |
24 |
unless @results |
|
466
|
0 |
24 |
unless $registered_checks{$self} |
|
|
14 |
10 |
if @{[] unless $registered_checks{$self};} == 1 |
|
472
|
57 |
48 |
if exists $c->{'_respond'} |
|
476
|
27 |
117 |
if (exists $c->{$field}) |
|
481
|
15 |
102 |
if ($c->{'invocant'} and $c->{'invocant'}->can($field)) |
|
483
|
5 |
10 |
if ($field eq 'tags') { } |
|
484
|
3 |
2 |
if (my(@tags) = $c->{'invocant'}->$field) |
|
492
|
7 |
8 |
if (defined $val) |
|
500
|
30 |
80 |
if $field eq 'tags' |
|
505
|
26 |
22 |
if $defaults{'tags'} |
|
553
|
0 |
64 |
unless $check->{'_respond'}{'tags'} |
|
563
|
12 |
60 |
if ($tag =~ /^!/) { } |
|
571
|
3 |
99 |
if @negative_tags and $self->_has_tags($check, @negative_tags) |
|
572
|
47 |
52 |
unless @positive_tags |