| line |
true |
false |
branch |
|
89
|
2 |
4 |
if ($untaint->error) |
|
132
|
2 |
2 |
unless ($Test->ok($untaint->error, $name)) |
|
135
|
2 |
0 |
if (defined $result) { } |
|
169
|
0 |
2 |
if ($untaint->error) |
|
183
|
0 |
2 |
if (not ref $result && ref $wanted) { } |
|
191
|
1 |
1 |
if (_deep_check($result, $wanted)) { } |
|
230
|
0 |
4 |
if ($untaint->error) |
|
244
|
0 |
4 |
if (not defined $object) { } |
|
|
1 |
3 |
elsif (not ref $object) { } |
|
261
|
1 |
2 |
if ($@) { } |
|
|
1 |
1 |
elsif (not $rslt) { } |
|
265
|
1 |
0 |
if ($@ =~ /^Can't call method "isa" on unblessed reference/) { } |
|
269
|
1 |
0 |
unless (UNIVERSAL::isa($object, $class)) |
|
298
|
3 |
1 |
if ($diag) { } |
|
336
|
1 |
16 |
if (@_) |
|
338
|
0 |
1 |
unless ref $_[0] eq 'HASH' |
|
380
|
0 |
4 |
if $a1 eq $a2 |
|
383
|
2 |
2 |
$#$a1 > $#$a2 ? : |
|
385
|
0 |
7 |
$_ > $#$a1 ? : |
|
386
|
2 |
5 |
$_ > $#$a2 ? : |
|
390
|
5 |
2 |
if $ok |
|
392
|
2 |
5 |
unless $ok |
|
406
|
4 |
5 |
if ($e1 eq $e2) { } |
|
410
|
4 |
1 |
if (UNIVERSAL::isa($e1, 'ARRAY') and UNIVERSAL::isa($e2, 'ARRAY')) { } |
|
|
0 |
1 |
elsif (UNIVERSAL::isa($e1, 'HASH') and UNIVERSAL::isa($e2, 'HASH')) { } |
|
|
0 |
1 |
elsif (UNIVERSAL::isa($e1, 'REF') and UNIVERSAL::isa($e2, 'REF')) { } |
|
|
0 |
1 |
elsif (UNIVERSAL::isa($e1, 'SCALAR') and UNIVERSAL::isa($e2, 'SCALAR')) { } |
|
425
|
0 |
0 |
if $ok |
|
451
|
0 |
3 |
if ($type eq 'HASH') { } |
|
|
2 |
1 |
elsif ($type eq 'ARRAY') { } |
|
|
0 |
1 |
elsif ($type eq 'REF') { } |
|
452
|
0 |
0 |
unless $did_arrow++ |
|
456
|
1 |
1 |
unless $did_arrow++ |
|
472
|
1 |
1 |
$val eq $DNE ? : |
|
|
0 |
2 |
!defined($val) ? : |