| line |
true |
false |
branch |
|
41
|
10 |
1 |
if (ref $tests eq 'ARRAY') { } |
|
46
|
2 |
26 |
unless (@tests) |
|
55
|
4 |
22 |
if (ref $this_test->{'input'} eq 'CODE') { } |
|
|
1 |
21 |
elsif (not Compare($this_test->{'input'}, \@params)) { } |
|
56
|
2 |
2 |
unless ($this_test->{'input'}->(@params)) |
|
64
|
1 |
22 |
if ($this_test->{'invocant_class'} and $this_test->{'invocant_object'}) { } |
|
|
5 |
17 |
elsif ($this_test->{'invocant_class'}) { } |
|
|
9 |
8 |
elsif ($this_test->{'invocant_object'}) { } |
|
67
|
1 |
4 |
if (ref $invocant) { } |
|
|
2 |
2 |
elsif ($invocant ne $this_test->{'invocant_class'}) { } |
|
73
|
1 |
8 |
unless (&blessed($invocant)) |
|
76
|
4 |
4 |
if (ref $this_test->{'invocant_object'} eq 'CODE') { } |
|
|
2 |
2 |
elsif (&blessed($invocant) ne $this_test->{'invocant_object'}) { } |
|
77
|
2 |
2 |
unless ($this_test->{'invocant_object'}->($invocant)) |
|
87
|
1 |
13 |
if (ref $output eq 'REF' and ref ${$output;} eq 'CODE') { } |
|
108
|
1 |
8 |
if (@{$closure{'@tests'};}) |