| line |
true |
false |
branch |
|
75
|
238 |
56 |
if /^(assert|refute|skip$|flunk$)/ |
|
104
|
29 |
244 |
if ref $msg eq 'CODE' |
|
108
|
270 |
3 |
if $test |
|
147
|
0 |
6 |
if $msg and ref $block ne 'CODE' |
|
168
|
0 |
6 |
if $msg and ref $block ne 'CODE' |
|
225
|
10 |
21 |
if (ref $collection eq 'ARRAY') { } |
|
|
6 |
15 |
elsif (ref $collection eq 'HASH') { } |
|
|
6 |
9 |
elsif (ref $collection) { } |
|
226
|
20 |
0 |
defined $obj ? : |
|
259
|
10 |
16 |
if (ref $collection eq 'ARRAY') { } |
|
|
6 |
10 |
elsif (ref $collection eq 'HASH') { } |
|
|
6 |
4 |
elsif (ref $collection) { } |
|
260
|
20 |
0 |
defined $obj ? : |
|
305
|
3 |
2 |
unless defined $error |
|
334
|
2 |
8 |
if (ref $collection eq 'ARRAY') { } |
|
|
2 |
6 |
elsif (ref $collection eq 'HASH') { } |
|
|
4 |
2 |
elsif (ref $collection) { } |
|
365
|
2 |
8 |
if (ref $collection eq 'ARRAY') { } |
|
|
2 |
6 |
elsif (ref $collection eq 'HASH') { } |
|
|
4 |
2 |
elsif (ref $collection) { } |
|
416
|
6 |
56 |
if ref $actual and ref $expected and &refaddr($actual) == &refaddr($expected) |
|
418
|
8 |
1142 |
if (UNIVERSAL::can($expected, 'equals')) { } |
|
|
24 |
1118 |
elsif (ref $actual eq 'ARRAY' and ref $expected eq 'ARRAY') { } |
|
|
10 |
1108 |
elsif (ref $actual eq 'HASH' and ref $expected eq 'HASH') { } |
|
|
18 |
1090 |
elsif (ref $actual and ref $expected) { } |
|
|
1038 |
52 |
elsif (&looks_like_number($actual) and &looks_like_number($expected)) { } |
|
|
44 |
8 |
elsif (defined $actual and defined $expected) { } |
|
478
|
4 |
50 |
if ref $actual and ref $unexpected and &refaddr($actual) == &refaddr($unexpected) |
|
480
|
4 |
100 |
if (UNIVERSAL::can($unexpected, 'equals')) { } |
|
|
24 |
76 |
elsif (ref $actual eq 'ARRAY' and ref $unexpected eq 'ARRAY') { } |
|
|
8 |
68 |
elsif (ref $actual eq 'HASH' and ref $unexpected eq 'HASH') { } |
|
|
18 |
50 |
elsif (ref $actual and ref $unexpected) { } |
|
|
28 |
22 |
elsif (&looks_like_number($actual) and &looks_like_number($unexpected)) { } |
|
|
17 |
5 |
elsif (defined $actual and defined $unexpected) { } |
|
526
|
0 |
11 |
unless defined $delta |
|
547
|
0 |
5 |
unless defined $delta |
|
567
|
1 |
7 |
unless defined $epsilon |
|
591
|
1 |
1 |
unless defined $epsilon |
|
707
|
1 |
0 |
unless defined $msg |
|
708
|
0 |
1 |
if ref $msg eq 'CODE' |
|
719
|
0 |
0 |
unless defined $msg |