| line |
true |
false |
branch |
|
29
|
77 |
20 |
if (not ref $assertion or ref($assertion) =~ /ARRAY/) |
|
30
|
75 |
2 |
defined $assertion ? : |
|
38
|
12 |
8 |
if (eval {
do {
$assertion->isa('Regexp')
}
}) |
|
44
|
7 |
1 |
if (ref $assertion eq 'CODE') |
|
56
|
1 |
0 |
if (not ref($assertion) =~ /^(GLOB|LVALUE|REF|SCALAR)$/) { } |
|
59
|
0 |
1 |
$assertion->can('do_assertion') ? : |
|
118
|
4 |
86 |
if (defined $str and $str =~ /^0x[A-Fa-f0-9]/) |
|
134
|
4 |
50 |
if (not defined $args[0] || defined $args[1]) { } |
|
|
2 |
48 |
elsif (defined $args[0] xor defined $args[1]) { } |
|
|
30 |
16 |
elsif (is_numeric($args[0])) { } |
|
|
0 |
16 |
elsif (eval {
do {
$args[0]->isa('UNIVERSAL') if ref $args[0]
}
}) { } |
|
140
|
0 |
16 |
if ref $args[0] |
|
145
|
0 |
0 |
if (overload::Method($args[0], '==')) { } |
|
169
|
4 |
36 |
if (@args == 1) { } |
|
|
34 |
2 |
elsif (@args >= 2 and @args <= 3) { } |
|
173
|
4 |
30 |
if (ref $args[0] eq 'CODE') { } |
|
|
4 |
26 |
elsif (eval {
do {
$args[1]->isa('Regexp')
}
}) { } |
|
199
|
2 |
37 |
if (not defined $args[0] || defined $args[1]) { } |
|
|
4 |
33 |
elsif (defined $args[0] xor defined $args[1]) { } |
|
|
26 |
6 |
elsif (is_numeric($args[0])) { } |
|
|
0 |
6 |
elsif (eval {
do {
$args[0]->isa('UNIVERSAL') if ref $args[0]
}
}) { } |
|
202
|
1 |
1 |
@args ? : |
|
207
|
0 |
6 |
if ref $args[0] |
|
212
|
0 |
0 |
if (overload::Method($args[0], '==')) { } |
|
243
|
10 |
36 |
unless (ref $this and ref $that) |
|
244
|
5 |
5 |
@_ ? : |
|
252
|
29 |
7 |
if (not $self->_deep_check($this, $that)) |
|
253
|
14 |
15 |
@_ ? : |
|
264
|
11 |
127 |
unless (defined $e1 and defined $e2) |
|
265
|
3 |
2 |
unless defined $e1 or defined $e2 |
|
270
|
8 |
119 |
if defined $e1 and $e1 eq $DNE or defined $e2 and $e2 eq $DNE |
|
273
|
39 |
80 |
if $e1 eq $e2 |
|
274
|
71 |
9 |
if (ref $e1 and ref $e2) |
|
276
|
4 |
67 |
if defined $Seen_Refs{$e1} and $Seen_Refs{$e1} eq $e2_ref |
|
280
|
27 |
49 |
if (UNIVERSAL::isa($e1, 'ARRAY') and UNIVERSAL::isa($e2, 'ARRAY')) { } |
|
|
29 |
20 |
elsif (UNIVERSAL::isa($e1, 'HASH') and UNIVERSAL::isa($e2, 'HASH')) { } |
|
|
0 |
20 |
elsif (UNIVERSAL::isa($e1, 'REF') and UNIVERSAL::isa($e2, 'REF')) { } |
|
|
7 |
13 |
elsif (UNIVERSAL::isa($e1, 'SCALAR') and UNIVERSAL::isa($e2, 'SCALAR')) { } |
|
289
|
0 |
0 |
if $ok |
|
305
|
0 |
27 |
if $a1 eq $a2 |
|
308
|
2 |
25 |
$#$a1 > $#$a2 ? : |
|
310
|
2 |
48 |
$_ > $#$a1 ? : |
|
311
|
2 |
48 |
$_ > $#$a2 ? : |
|
315
|
33 |
17 |
if $ok |
|
317
|
17 |
33 |
unless $ok |
|
325
|
0 |
29 |
if $a1 eq $a2 |
|
328
|
4 |
25 |
keys %$a1 > keys %$a2 ? : |
|
330
|
45 |
0 |
exists $$a1{$k} ? : |
|
331
|
41 |
4 |
exists $$a2{$k} ? : |
|
335
|
25 |
20 |
if $ok |
|
337
|
20 |
25 |
unless $ok |
|
352
|
10 |
24 |
if ($type eq 'HASH') { } |
|
|
10 |
14 |
elsif ($type eq 'ARRAY') { } |
|
|
3 |
11 |
elsif ($type eq 'REF') { } |
|
353
|
6 |
4 |
unless $did_arrow++ |
|
357
|
7 |
3 |
unless $did_arrow++ |
|
374
|
4 |
22 |
$val eq $DNE ? : |
|
|
4 |
26 |
!defined($val) ? : |