| line |
true |
false |
branch |
|
270
|
12 |
24 |
$checks ? : |
|
329
|
1 |
28 |
unless ref $self |
|
330
|
0 |
28 |
unless @checks |
|
333
|
12 |
16 |
if @checks == 1 and (ref $checks[0] || '') eq "ARRAY" |
|
348
|
0 |
24 |
$type eq 'ARRAY' ? : |
|
|
21 |
24 |
$type eq 'HASH' ? : |
|
352
|
3 |
42 |
unless $c{'check'} |
|
356
|
13 |
29 |
unless ((ref $c{'check'} || '') eq "CODE") |
|
361
|
4 |
7 |
if ($c{'check'} and not $c{'invocant'} and do {
local $@;
eval {
do {
$c{'check'}->can("check")
}
}
}) |
|
372
|
7 |
6 |
unless ($c{'invocant'}) |
|
375
|
4 |
3 |
if ($caller->can($c{'check'})) { } |
|
384
|
2 |
8 |
unless $c{'invocant'}->can($c{'check'}) |
|
427
|
1 |
28 |
unless ref $self |
|
428
|
1 |
27 |
unless $registered_checks{$self} |
|
|
1 |
27 |
unless @{[] unless $registered_checks{$self};} |
|
443
|
0 |
3 |
unless $registered_checks{$self} |
|
447
|
2 |
13 |
unless $check->{'_respond'}{'tags'} |
|
458
|
22 |
5 |
unless exists $params{'summarize_result'} |
|
463
|
0 |
27 |
unless $registered_checks{$self} |
|
468
|
2 |
25 |
unless @results |
|
469
|
0 |
25 |
unless $registered_checks{$self} |
|
|
14 |
11 |
if @{[] unless $registered_checks{$self};} == 1 |
|
498
|
17 |
26 |
$i ? : |
|
499
|
1 |
42 |
if $@ and not @r |
|
505
|
8 |
2 |
@r % 2 == 0 ? : |
|
|
33 |
10 |
@r == 1 && ref $r[0] eq 'HASH' ? : |
|
506
|
1 |
1 |
$i ? : |
|
511
|
41 |
2 |
if (@r) |
|
518
|
89 |
47 |
if exists $c->{'_respond'} |
|
522
|
29 |
159 |
if (exists $c->{$field}) |
|
527
|
20 |
139 |
if ($c->{'invocant'} and $c->{'invocant'}->can($field)) |
|
529
|
4 |
16 |
if ($field eq 'tags') { } |
|
530
|
2 |
2 |
if (my(@tags) = $c->{'invocant'}->$field) |
|
538
|
6 |
14 |
if (defined $val) |
|
546
|
31 |
122 |
if $field eq "tags" |
|
551
|
23 |
24 |
if $defaults{'tags'} |
|
599
|
0 |
78 |
unless $check->{'_respond'}{'tags'} |
|
609
|
12 |
74 |
if ($tag =~ /^!/) { } |
|
617
|
3 |
114 |
if @negative_tags and $self->_has_tags($check, @negative_tags) |
|
618
|
48 |
66 |
unless @positive_tags |