Branch Coverage

blib/lib/Text/EditTranscript.pm
Criterion Covered Total %
branch 20 26 76.9


line true false branch
51 5172 55864 if (substr($str, $i - 1, 1) eq substr($str2, $j - 1, 1)) { }
60 30391 30645 if ($$dist[$i][$j] eq $$dist[$i][$j - 1] + 1)
63 30370 30666 if ($$dist[$i][$j] eq $$dist[$i - 1][$j] + 1)
66 5646 55390 if ($$dist[$i][$j] eq $$dist[$i - 1][$j - 1] + $cost)
67 5172 474 if ($cost eq 0) { }
91 257 0 if (defined $$transcript[$i][$j])
95 0 257 unless defined $$transcript[$i][$j]
97 255 2 if ($$transcript[$i][$j] eq 'S' or $$transcript[$i][$j] eq '-') { }
1 1 elsif ($$transcript[$i][$j] eq 'I') { }
98 255 0 if $i > 0
99 255 0 if $j > 0
102 1 0 if $j > 0
105 1 0 if $i > 0