| line |
true |
false |
branch |
|
59
|
0 |
2 |
if ($plan[$idx] eq 'import') |
|
118
|
0 |
0 |
unless (@methods) |
|
128
|
0 |
0 |
unless eval {
do {
$proto->can($method)
}
} |
|
132
|
0 |
0 |
@methods == 1 ? : |
|
147
|
0 |
20 |
unless defined $obj_name |
|
149
|
0 |
20 |
if (not defined $object) { } |
|
|
0 |
20 |
elsif (not ref $object) { } |
|
159
|
0 |
20 |
if ($@) { } |
|
|
0 |
20 |
elsif (not $rslt) { } |
|
160
|
0 |
0 |
if ($@ =~ /^Can't call method "isa" on unblessed reference/) { } |
|
161
|
0 |
0 |
unless (UNIVERSAL::isa($object, $class)) |
|
183
|
0 |
20 |
if ($diag) { } |
|
213
|
0 |
0 |
unless @imports |
|
226
|
0 |
0 |
unless ($ok) |
|
252
|
0 |
0 |
unless ($ok) |
|
267
|
0 |
0 |
unless (defined $how_many) |
|
269
|
0 |
0 |
unless $Test::Builder::No_Plan |
|
287
|
0 |
0 |
unless (defined $how_many) |
|
289
|
0 |
0 |
unless $Test::Builder::No_Plan |
|
309
|
0 |
16 |
if (not ref $this && ref $that) { } |
|
314
|
16 |
0 |
if (_deep_check($this, $that)) { } |
|
334
|
0 |
0 |
if ($type eq 'HASH') { } |
|
|
0 |
0 |
elsif ($type eq 'ARRAY') { } |
|
|
0 |
0 |
elsif ($type eq 'REF') { } |
|
335
|
0 |
0 |
unless $did_arrow++ |
|
339
|
0 |
0 |
unless $did_arrow++ |
|
355
|
0 |
0 |
$val eq $DNE ? : |
|
|
0 |
0 |
!defined($val) ? : |
|
370
|
0 |
0 |
if $a1 eq $a2 |
|
373
|
0 |
0 |
$#$a1 > $#$a2 ? : |
|
375
|
0 |
0 |
$_ > $#$a1 ? : |
|
376
|
0 |
0 |
$_ > $#$a2 ? : |
|
380
|
0 |
0 |
if $ok |
|
382
|
0 |
0 |
unless $ok |
|
396
|
66 |
96 |
if ($e1 eq $e2) { } |
|
400
|
0 |
96 |
if (UNIVERSAL::isa($e1, 'ARRAY') and UNIVERSAL::isa($e2, 'ARRAY')) { } |
|
|
96 |
0 |
elsif (UNIVERSAL::isa($e1, 'HASH') and UNIVERSAL::isa($e2, 'HASH')) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($e1, 'REF') and UNIVERSAL::isa($e2, 'REF')) { } |
|
|
0 |
0 |
elsif (UNIVERSAL::isa($e1, 'SCALAR') and UNIVERSAL::isa($e2, 'SCALAR')) { } |
|
415
|
0 |
0 |
if $ok |
|
437
|
0 |
96 |
if $a1 eq $a2 |
|
440
|
0 |
96 |
keys %$a1 > keys %$a2 ? : |
|
442
|
146 |
0 |
exists $$a1{$k} ? : |
|
443
|
146 |
0 |
exists $$a2{$k} ? : |
|
447
|
146 |
0 |
if $ok |
|
449
|
0 |
146 |
unless $ok |
|
455
|
0 |
0 |
ref $a ? : |
|
459
|
0 |
0 |
unless @$a1 == @$a2 |