Branch Coverage

blib/lib/Text/ANSI/BaseUtil.pm
Criterion Covered Total %
branch 179 246 72.7


line true false branch
17 2 2 $text =~ /$re/s ? :
30 3 4 if ($e =~ /\n/)
34 3 1 if $num_lines == 0
35 0 4 $is_mb ? :
91 0 8 $is_mb ? :
95 0 8 $is_mb ? :
119 0 229 if ($is_mb and $1) { }
112 117 elsif ($3) { }
124 0 117 if ($is_mb) { }
127 0 0 if ($1) { }
141 4 16 unless @s
145 16 233 unless $only_code or defined $s
147 4 229 if ($only_code)
149 4 0 if defined $c
153 117 116 if ($s_type and $s_type ne 's') { }
112 4 elsif (length $s) { }
154 109 8 if ($prev_type eq 's') { }
0 16 elsif ($prev_type and $prev_type ne $s_type) { }
168 0 0 $is_mb ? :
174 6 111 if defined $c and not @s
175 6 5 unless (@s or @ch)
180 0 6 $is_mb ? :
184 111 1 if ($prev_type ne 's')
189 0 111 $is_mb ? :
195 3 109 if defined $c and not @s
196 2 3 unless (@s or @ch)
207 20 213 unless (@s)
208 13 7 if (defined $c and $c =~ /m\z/)
209 6 7 if ($c eq "\e[0m") { }
7 0 elsif ($c =~ /m\z/) { }
217 4 16 if $only_code
228 111 117 if ($termst[$i] eq 's')
229 2 109 if ($pterms[$i] =~ /[ \t]*(\n(?:[ \t]*\n)+)([ \t]*)/)
233 2 0 if ($i < @pterms - 1)
238 0 2 if (length $2)
270 0 8 unless $tw > 0
272 0 8 if defined $optfli
274 0 8 if defined $optsli
285 220 8 if $i
290 220 8 $i > 0 ? :
294 2 226 if ($termt eq 'p')
298 0 4 if $crcode and $_ == 1
299 0 4 if $pad
310 10 216 if ($is_parastart)
312 0 10 if (defined $optfli) { }
316 0 10 if ($termt eq 's') { }
327 109 117 if ($termst[$j] eq 's')
328 0 109 if ($pterms[$j] =~ /\n([ \t]+)/)
336 10 0 unless (defined $sli)
341 0 10 if $sliw >= $width
351 109 117 if ($termt eq 's')
356 2 107 if ($pterm =~ /\n/ and $i == $#terms)
357 0 2 if $crcode
358 0 2 if $pad
364 117 109 if ($termt ne 's')
377 117 3 if ($termw <= $width - $sliw or $termt eq 'c')
381 107 10 $prev_t && $prev_t eq 's' ? :
385 0 3 $is_mb ? :
389 3 0 if ($j == 1) { }
402 0 0 $crcode ? :
412 2 1 $prev_t && $prev_t eq 's' ? :
3 0 $j == 1 ? :
414 0 3 $is_mb ? :
426 19 101 if not defined $maxww or $maxww < $wordw
427 10 110 if not defined $minww or $minww > $wordw
429 110 10 $line_has_word ? :
104 16 if ($x + ($line_has_word ? 1 : 0) + $wordw <= $width) { }
430 94 10 if ($line_has_word and $ws_before)
439 0 16 if ($wordt eq 'c') { }
442 0 0 if ($ws_before) { }
453 2 14 if $crcode
455 0 16 if $pad
456 0 16 if $ws_before and $optkts
462 16 0 if ($sliw + $wordw <= $width) { }
478 0 8 if $line_has_word and $pad
481 1 7 if ($opts->{'return_stats'}) { }
501 3 4 if ($which) { }
508 0 7 $is_mb ? :
509 1 6 if ($is_trunc and $w > $width) { }
510 0 1 $is_mb ? :
514 1 5 if ($which eq 'l') { }
1 4 elsif ($which eq 'c') { }
520 3 1 if $width > $w
541 0 16 $is_mb ? :
542 2 14 if ($w <= $width)
543 0 2 $return_extra ? :
555 32 13 if ($append) { }
556 0 32 $is_mb ? :
558 22 10 if ($w + $tw <= $width) { }
562 4 18 if $w == $width
565 0 10 $is_mb ? :
579 39 6 if (defined $ansi)
580 18 21 if ($append) { }
581 1 17 if ($ansi eq "\e[0m") { }
602 10 4 if ($return_extra) { }
636 8 0 if (defined $c and $c =~ /m\z/)
637 2 6 if ($c eq "\e[0m") { }
6 0 elsif ($c =~ /m\z/) { }
648 0 2 if (ref $needle eq 'Regexp') { }
650 0 0 unless @m
656 0 0 if $p >= 0
658 0 0 unless @pt
662 0 0 if ($pmin > $_->[0] or $pmin == $_->[0] and length $t < length $_->[1])
670 0 0 unless $is_all
678 1 3 if $p < 0
681 1 2 unless $is_all
683 0 2 if $pos >= length $plaintext
685 0 2 unless @needle
697 2 9 if $i >= @chptext
701 4 5 if ($pos > $npos2 or $pos2 < $npos or not $found)
705 4 0 if defined $chcode[$i]
710 3 2 if ($pos < $npos)
719 5 0 if (length $npart)
728 3 2 if ($npos2 <= $pos2)
732 1 2 if (@needle) { }
745 2 0 unless ($found)
748 2 0 if defined $chcode[$i]
776 1 3 $i > 1 && !$savedc ? :
782 3 4 if (defined $c and $c =~ /m\z/)
784 1 2 if ($c eq "\e[0m") { }
2 0 elsif ($c =~ /m\z/) { }
792 2 2 if $savedc and $i < @text
808 2 1 if (@_) { }