Branch Coverage

blib/lib/Text/NumericData/App/txdcolumns.pm
Criterion Covered Total %
branch 11 16 68.7


line true false branch
58 1 2 defined $param->{'columns'} ? :
89 0 3 if (not $param->{'title'}) { }
98 2 5 if ($param->{'title'} == 1 or not $cc =~ /^\d+$/) { }
104 2 2 if ($self->{'txd'}{'titles'}[$i] =~ /$cc/)
129 0 7 if not $param->{'fill'} and $n < 0 || @{$self->{'txd'}{'titles'};} && $n > $#{$$self{'txd'}{'titles'};}
137 0 3 if $param->{'debug'}
139 3 0 if ($#{$$self{'txd'}{'titles'};} > -1) { }
142 0 3 if $param->{'debug'}