Branch Coverage

inc/Test/More.pm
Criterion Covered Total %
branch 1 96 1.0


line true false branch
181 0 16 if ($plan[$idx] eq 'import')
461 0 0 unless (@methods)
471 0 0 unless eval {
475 0 0 @methods == 1 ? :
518 0 0 unless defined $obj_name
520 0 0 if (not defined $object) { }
0 0 elsif (not ref $object) { }
530 0 0 if ($@) { }
0 0 elsif (not $rslt) { }
531 0 0 if ($@ =~ /^Can't call method "isa" on unblessed reference/) { }
532 0 0 if (not UNIVERSAL::isa($object, $class))
554 0 0 if ($diag) { }
679 0 0 unless @imports
692 0 0 unless ($ok)
725 0 0 unless ($ok)
800 0 0 unless (defined $how_many)
802 0 0 unless $Test::Builder::No_Plan
877 0 0 unless (defined $how_many)
879 0 0 unless $Test::Builder::No_Plan
939 0 0 if (not ref $this or not ref $that) { }
944 0 0 if (_deep_check($this, $that)) { }
964 0 0 if ($type eq 'HASH') { }
0 0 elsif ($type eq 'ARRAY') { }
0 0 elsif ($type eq 'REF') { }
965 0 0 unless $did_arrow++
969 0 0 unless $did_arrow++
985 0 0 $val eq $DNE ? :
0 0 !defined($val) ? :
1010 0 0 if $a1 eq $a2
1013 0 0 $#$a1 > $#$a2 ? :
1015 0 0 $_ > $#$a1 ? :
1016 0 0 $_ > $#$a2 ? :
1020 0 0 if $ok
1022 0 0 unless $ok
1036 0 0 if ($e1 eq $e2) { }
1040 0 0 if (UNIVERSAL::isa($e1, 'ARRAY') and UNIVERSAL::isa($e2, 'ARRAY')) { }
0 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')) { }
1055 0 0 if $ok
1085 0 0 if $a1 eq $a2
1088 0 0 keys %$a1 > keys %$a2 ? :
1090 0 0 exists $$a1{$k} ? :
1091 0 0 exists $$a2{$k} ? :
1095 0 0 if $ok
1097 0 0 unless $ok
1119 0 0 ref $a ? :
1123 0 0 unless @$a1 == @$a2