| line |
true |
false |
branch |
|
270
|
12 |
23 |
$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' ? : |
|
|
20 |
24 |
$type eq 'HASH' ? : |
|
352
|
3 |
41 |
unless $c{'check'} |
|
356
|
13 |
28 |
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 |
26 |
unless ref $self |
|
428
|
1 |
25 |
unless $registered_checks{$self} |
|
|
1 |
25 |
unless @{[] unless $registered_checks{$self};} |
|
436
|
20 |
5 |
unless exists $params{'summarize_result'} |
|
441
|
0 |
25 |
unless $registered_checks{$self} |
|
446
|
1 |
24 |
unless @results |
|
447
|
0 |
24 |
unless $registered_checks{$self} |
|
|
14 |
10 |
if @{[] unless $registered_checks{$self};} == 1 |
|
476
|
15 |
26 |
$i ? : |
|
477
|
1 |
40 |
if $@ and not @r |
|
483
|
8 |
2 |
@r % 2 == 0 ? : |
|
|
31 |
10 |
@r == 1 && ref $r[0] eq 'HASH' ? : |
|
484
|
1 |
1 |
$i ? : |
|
489
|
39 |
2 |
if (@r) |
|
496
|
57 |
48 |
if exists $c->{'_respond'} |
|
500
|
31 |
161 |
if (exists $c->{$field}) |
|
505
|
22 |
139 |
if ($c->{'invocant'} and $c->{'invocant'}->can($field)) |
|
507
|
5 |
17 |
if ($field eq 'tags') { } |
|
508
|
3 |
2 |
if (my(@tags) = $c->{'invocant'}->$field) |
|
516
|
9 |
13 |
if (defined $val) |
|
524
|
30 |
122 |
if $field eq "tags" |
|
529
|
26 |
22 |
if $defaults{'tags'} |
|
577
|
0 |
64 |
unless $check->{'_respond'}{'tags'} |
|
587
|
12 |
60 |
if ($tag =~ /^!/) { } |
|
595
|
3 |
99 |
if @negative_tags and $self->_has_tags($check, @negative_tags) |
|
596
|
47 |
52 |
unless @positive_tags |