Branch Coverage

blib/lib/Text/NumericData/App/txdrecycle.pm
Criterion Covered Total %
branch 21 32 65.6


line true false branch
54 0 1 if ($self->{'col'} < 0)
67 3 838 unless ($self->{'data'})
70 1 2 if $self->{'txd'}->line_check($_[0])
73 839 2 if ($self->{'data'})
75 13 826 if ($_[0] =~ /^\s*$/)
85 826 0 if (defined $d)
130 0 14 if @{$self->{'block'};} < 2
134 14 0 $period > 0 ? :
138 0 14 unless $period > 0
145 0 14 if $shift < 0
151 0 14 if $i == 0 or $i == $#{$$self{'block'};}
167 14 0 if ($dir * $self->{'block'}[0][$self->{'col'}] < -$period)
177 14 0 $dir == 1 ? :
178 14 0 $dir == 1 ? :
183 14 140 if ($arr->[$i][0] >= $val)
190 0 14 $val - $arr->[$lower][0] < $arr->[$upper][0] - $val ? :