Branch Coverage

blib/lib/String/FlexMatch/Test.pm
Criterion Covered Total %
branch 19 62 30.6


line true false branch
29 12 0 if (not ref $got && ref $expect) { }
33 0 0 if (_deep_check($got, $expect)) { }
45 0 12 unless (defined $got and defined $expect)
50 0 0 unless $test
66 0 12 unless ($ok)
67 0 0 if ($type =~ /^(eq|==)$/) { }
83 0 0 if ($type eq 'HASH') { }
0 0 elsif ($type eq 'ARRAY') { }
0 0 elsif ($type eq 'REF') { }
84 0 0 unless $did_arrow++
87 0 0 unless $did_arrow++
100 0 0 $val eq $DNE ? :
0 0 !defined($val) ? :
113 0 0 if $a1 eq $a2
115 0 0 $#$a1 > $#$a2 ? :
117 0 0 $_ > $#$a1 ? :
118 0 0 $_ > $#$a2 ? :
121 0 0 if $ok
122 0 0 unless $ok
138 8 5 if ($e1 eq $e2) { }
141 0 5 if (UNIVERSAL::isa($e1, 'ARRAY') and UNIVERSAL::isa($e2, 'ARRAY')) { }
3 2 elsif (UNIVERSAL::isa($e1, 'HASH') and UNIVERSAL::isa($e2, 'HASH')) { }
0 2 elsif (UNIVERSAL::isa($e1, 'REF') and UNIVERSAL::isa($e2, 'REF')) { }
0 2 elsif (UNIVERSAL::isa($e1, 'SCALAR') and UNIVERSAL::isa($e2, 'SCALAR')) { }
151 0 0 if $ok
167 0 6 if $a1 eq $a2
169 0 6 keys %$a1 > keys %$a2 ? :
171 12 1 exists $$a1{$k} ? :
172 13 0 exists $$a2{$k} ? :
175 10 3 if $ok
176 3 10 unless $ok