Branch Coverage

blib/lib/App/ansicolumn/Util.pm
Criterion Covered Total %
branch 36 56 64.2


line true false branch
12 38 295 unless my $border = +(shift())->{'BORDER'}
38 10 29 if ($lb_flag{$obj->linebreak} & 1) { }
59 1 19 unless $obj->width
82 19 0 if ($obj->discard_el)
92 0 19 if ((my $ls = $obj->linestyle) eq 'truncate') { }
19 0 elsif ($ls eq 'wrap') { }
113 0 17 if $height <= 0
117 62 0 if ($pagebreak)
120 17 45 if $end > @$dp
121 4 58 if (defined(my $i = &first(sub { $dp->[$_] =~ /\f/u; } , $top .. $end - 1)))
122 0 4 unless $dp->[$i] =~ s/^([^\f]*)\f//u
123 0 4 $dp->[$i] eq '' ? :
0 4 $1 ne '' ? :
124 0 4 $1 ne '' ? :
125 4 0 if ($lines > 0)
127 4 0 if $fill > 0
132 15 43 if ($height >= 4 and $top > 2 and not $obj->isolation)
133 5 10 if (not $$dp[$top - 2] =~ /\S/u and $$dp[$top - 1] =~ /\S/u)
140 11 42 unless ($obj->white_space)
151 15 0 if (my $remmant = @$dp % $len)
160 2 15 unless defined $obj->fillup and not $obj->fillup =~ /^(?:no|none)$/u
163 0 15 if $obj->fillup eq "page"
178 0 18 unless ref $index
193 0 30 if $b == 0
201 0 1 if (open my $tty, ">", "/dev/tty")
207 0 1 @size ? :
218 0 0 @$a && $App::ansicolumn::a->[-1] ne '' && $b ne '' ? :
224 0 106 utf8::is_utf8($_) ? :