Branch Coverage

blib/lib/Text/ANSI/Fold.pm
Criterion Covered Total %
branch 114 138 82.6


line true false branch
94 2 372 if ($Text::VisualWidth::PP::EastAsian) { }
113 0 12 if ($] < "5.016")
175 4 9 if @_
186 87 539 if $_[0]{'linebreak'} & 1
187 83 447 if $_[0]{'linebreak'} & 2
196 1848 12 if (length $_ == 1) { }
202 12 12 if (@s) { }
220 12 35 unless (ref $obj)
223 0 47 if @_ % 2
227 1 70 if ($a eq "tabstyle")
229 0 1 unless my($h, $s) = $b =~ /([-\w]+)/gu
241 0 70 unless exists $obj->{$a}
244 0 47 if (ref $obj->{'discard'} eq "ARRAY")
255 138 31 @reset ? :
264 429 197 unless (ref $obj)
270 0 626 unless &looks_like_number($width)
271 10 616 if $width < 0
272 0 626 unless ($width -= $opt->{'margin'}) > 0
284 328 298 $opt->{'expand'} ? :
290 0 1788 if (s/\A(\r*\n)//u)
295 0 1788 if (s/\A([\f\r]+)//u)
296 0 0 if length $_ == 0
302 0 1788 if (s/\A($osc_re)//u)
303 0 0 unless $obj->{'discard'}{'OSC'}
307 1 1787 if (s/\A($erase_re)//u)
308 1 0 unless $obj->{'discard'}{'EL'}
313 138 1649 if (s/\A($reset_re+($erase_re*))//u)
315 0 138 if $2
319 513 1136 if $room < 1
320 10 364 if $room != $width and &_startWideSpacing and $room < 2
322 97 1029 if (@reset)
327 182 944 if (s/\A($color_re)//u)
334 112 832 if ($opt->{'expand'} and s/\A\t//u)
344 7 832 if ($w > $room)
345 4 3 if ($folded eq '') { }
356 39 793 if $room < 1
358 56 769 if $bs
360 769 0 if (s/\A(\e+|(?:$yield_re(?!\cH))+)//u) { }
362 330 439 if ((my $w = vwidth($s)) <= $room)
368 0 439 if ($w > $room and $room < $width)
382 36 16 if ($word_char_re and my($w2) = /\A( (?: $word_char_re \cH ? ) + )/ux and my($lead, $w1) = $folded =~ / \A ## avoid CSI final char making a word ( (?: [^\e]* $csi_re++ ) *+ .*? ) ( (?: $word_char_re \cH ? ) + ) \z /ux)
394 28 8 $opt->{'prefix'} eq '' ? :
395 31 5 if ($room + $l < $width - $p and $l + pwidth($w2) <= $width - $p)
405 83 543 if ($_ ne "" and $opt->do_runout)
406 18 5 if ($folded =~ / (? (?! $reset_re) $color_re*+ ) (? (?: ($prohibition_re{'end'}) (?: \cH{1,2} \g{-1})* )+ ) \z /pux and ${^PREMATCH} ne "" and (my $w = pwidth($+{'runout'})) <= $opt->{'runout'})
416 2 16 if $+{'color'}
421 39 587 if @reset
428 87 539 if ($opt->do_runin)
438 0 28 if ($m -= $w) < 0
439 2 26 if ($+{'color'})
440 2 26 if ($+{'reset'})
445 24 63 if @runin
448 44 582 if (@color_stack)
450 44 0 if $_ ne ""
453 12 614 if ($opt->{'padding'} and $room > 0)
455 1 11 if (@bg_stack)
461 19 607 if (length $_ and my $p = $opt->{'prefix'})
462 4 15 ref $p eq 'CODE' ? :
475 0 439 if $width <= 0
477 0 439 unless my($left, $right) = $orig =~ /^(\X{0,$width}+)(.*)/u
484 0 86 unless int(($w - $width) / 2 + "0.5")
486 3 83 unless $left =~ s/\X \K ( \X{$trim} ) \z//ux
499 6 1 if (@_ == 0) { }
502 0 1 if @_ > 1
511 9 56 unless defined $_
513 13 43 if length $_ == 0
524 8 7 if (ref $width eq 'ARRAY') { }
526 2 38 if ($w == 0) { }
35 3 elsif ((my $chop = $obj->retrieve('width', $w)) ne '') { }