Branch Coverage

blib/lib/Text/Table/Tiny.pm
Criterion Covered Total %
branch 52 56 92.8


line true false branch
46 1 85 unless exists $arguments{$arg}
49 2 29 unless my $rows = $param{'rows'}
52 1 2 if (exists $param{'header'} and exists $param{'header_row'})
56 2 26 if (exists $param{'header'})
57 1 1 unless (XXX)
65 18 9 unless defined $param{'style'}
67 26 1 unless defined $param{'indent'}
68 1 26 if $param{'indent'} =~ /^[0-9]+$/
71 0 27 unless exists $charsets{$style}
74 23 4 if ($style eq "classic")
84 9 18 if (defined $param{'align'}) { }
87 3 6 XXX ? :
94 18 9 if $param{'header_row'}
110 4 23 if $param->{'top_and_tail'}
118 4 23 if $param->{'top_and_tail'}
125 0 73 $param->{'compact'} ? :
138 9 18 unless $param->{'header_row'}
146 9 18 unless $param->{'header_row'}
147 6 12 $param->{'separate_rows'} ? :
155 9 18 $param->{'separate_rows'} ? :
178 94 213 unless defined $text
179 0 307 unless defined $align
181 0 307 $param->{'compact'} ? :
183 12 295 if ($align eq 'r' or $align eq 'right') { }
24 271 elsif ($align eq 'c' or $align eq 'center' or $align eq 'centre') { }
190 1 23 if $total_spaces % 2 == 1
205 47 213 unless defined $columns[$i]
209 144 69 if not defined $widths[$i] or $width > $widths[$i]