Branch Coverage

blib/lib/Cz/Sort.pm
Criterion Covered Total %
branch 71 82 86.5


line true false branch
96 18 174 if $level <= 2 and $def_row =~ /^ /
100 150 629 if ($match eq ' ') { }
102 36 114 if ($level == 1)
107 617 12 if (length $match == 1) { }
114 337 292 if ($level >= 2)
118 84 90 if $level < 2
136 0 56 if DEBUG()
143 237 47 if ($level == 0) { }
147 12 228 unless $a =~ /$regexp[$level]/gs
151 224 16 length $ac == 1 ? :
240 0 if defined $ac
156 15 225 unless $b =~ /$regexp[$level]/gs
160 224 16 length $bc == 1 ? :
240 0 if defined $bc
168 4 44 unless $a1 =~ /$regexp[$level]/gs
172 44 4 length $ac == 1 ? :
48 0 if defined $ac
177 4 43 unless $b1 =~ /$regexp[$level]/gs
181 43 4 length $bc == 1 ? :
47 0 if defined $bc
186 0 284 if DEBUG()
188 6 278 if $a_no and not $b_no
189 9 269 if not $a_no and $b_no
190 10 259 if ($a_no and $b_no)
192 6 4 if ($level == 0)
197 16 243 if $ax < $bx
198 21 222 if $ax > $bx
200 7 215 if ($ax == 0 and $bx == 0)
202 4 3 if ($level == 0)
215 1 6 unless $a =~ /$regexp[$level]/gs
219 6 1 length $ac == 1 ? :
7 0 if defined $ac
224 1 5 unless $b =~ /$regexp[$level]/gs
228 5 1 length $bc == 1 ? :
6 0 if defined $bc
232 0 6 if DEBUG()
233 0 6 if $a_no and not $b_no
234 0 6 if not $a_no and $b_no
235 1 5 if ($a_no and $b_no)
237 2 3 if $ax < $bx
238 2 1 if $ax > $bx