line |
true |
false |
branch |
186
|
0 |
10 |
if ($item eq 'no_diag') { } |
212
|
0 |
6 |
if ($item eq 'import') { } |
491
|
0 |
0 |
unless (@methods) |
501
|
0 |
0 |
unless eval {
do {
$proto->can($method)
}
} |
505
|
0 |
0 |
@methods == 1 ? : |
548
|
0 |
0 |
unless defined $obj_name |
550
|
0 |
0 |
if (not defined $object) { } |
|
0 |
0 |
elsif (not ref $object) { } |
560
|
0 |
0 |
if ($@) { } |
|
0 |
0 |
elsif (not $rslt) { } |
561
|
0 |
0 |
if ($@ =~ /^Can't call method "isa" on unblessed reference/) { } |
562
|
0 |
0 |
unless (UNIVERSAL::isa($object, $class)) |
584
|
0 |
0 |
if ($diag) { } |
667
|
0 |
1 |
unless $Show_Diag |
724
|
1 |
0 |
unless @imports |
730
|
0 |
1 |
if (@imports == 1 and $imports[0] =~ /^\d+(?:\.\d+)?$/) { } |
747
|
0 |
1 |
unless ($ok) |
777
|
0 |
0 |
unless _is_module_name($module) |
787
|
0 |
0 |
unless ($ok) |
875
|
0 |
0 |
unless (defined $how_many) |
877
|
0 |
0 |
unless $Test->has_plan eq 'no_plan' |
955
|
0 |
0 |
unless (defined $how_many) |
957
|
0 |
0 |
unless $Test->has_plan eq 'no_plan' |
1011
|
0 |
0 |
unless (@_ == 2 or @_ == 3) |
1025
|
0 |
0 |
if (not ref $this xor not ref $that) |
1028
|
0 |
0 |
if (not ref $this || ref $that) { } |
1034
|
0 |
0 |
if (_deep_check($this, $that)) { } |
1054
|
0 |
0 |
if ($type eq 'HASH') { } |
|
0 |
0 |
elsif ($type eq 'ARRAY') { } |
|
0 |
0 |
elsif ($type eq 'REF') { } |
1055
|
0 |
0 |
unless $did_arrow++ |
1059
|
0 |
0 |
unless $did_arrow++ |
1075
|
0 |
0 |
$val eq $DNE ? : |
|
0 |
0 |
!defined($val) ? : |
1091
|
0 |
0 |
unless ref $thing |
1094
|
0 |
0 |
if UNIVERSAL::isa($thing, $type) |
1120
|
0 |
0 |
if (grep((!_type($_) eq 'ARRAY'), $a1, $a2)) |
1125
|
0 |
0 |
if $a1 eq $a2 |
1127
|
0 |
0 |
if ($Test::More::Refs_Seen{$a1}) { } |
1135
|
0 |
0 |
$#$a1 > $#$a2 ? : |
1137
|
0 |
0 |
$_ > $#$a1 ? : |
1138
|
0 |
0 |
$_ > $#$a2 ? : |
1142
|
0 |
0 |
if $ok |
1144
|
0 |
0 |
unless $ok |
1163
|
0 |
0 |
if (defined $e1 xor defined $e2) { } |
|
0 |
0 |
elsif ($e1 == $DNE xor $e2 == $DNE) { } |
|
0 |
0 |
elsif ($same_ref and $e1 eq $e2) { } |
1174
|
0 |
0 |
unless _type($e2) eq $type |
1176
|
0 |
0 |
if (not $type) { } |
|
0 |
0 |
elsif ($type eq 'ARRAY') { } |
|
0 |
0 |
elsif ($type eq 'HASH') { } |
|
0 |
0 |
elsif ($type eq 'REF') { } |
|
0 |
0 |
elsif ($type eq 'SCALAR') { } |
1189
|
0 |
0 |
if $ok |
1194
|
0 |
0 |
if $ok |
1221
|
0 |
0 |
if (grep((!_type($_) eq 'HASH'), $a1, $a2)) |
1226
|
0 |
0 |
if $a1 eq $a2 |
1228
|
0 |
0 |
if ($Test::More::Refs_Seen{$a1}) { } |
1236
|
0 |
0 |
keys %$a1 > keys %$a2 ? : |
1238
|
0 |
0 |
exists $$a1{$k} ? : |
1239
|
0 |
0 |
exists $$a2{$k} ? : |
1243
|
0 |
0 |
if $ok |
1245
|
0 |
0 |
unless $ok |
1266
|
0 |
0 |
unless @$a1 == @$a2 |
1276
|
0 |
0 |
ref $b ? : |
|
0 |
0 |
ref $a ? : |
1277
|
0 |
0 |
ref $b ? : |
|
0 |
0 |
ref $a ? : |