Branch Coverage

blib/lib/Text/NumericData/App/txdfromafors.pm
Criterion Covered Total %
branch 12 12 100.0


line true false branch
61 8 1141 if ($self->{'place'} == $head)
64 2 6 if ($_[0] =~ /^[\+\-\d]/) { }
68 386 763 if ($self->{'place'} == $data)
70 2 384 if ($_[0] =~ /^\s*$/)
79 757 390 if ($self->{'place'} == $post)
110 1 1 if $txd->{'titles'}[1] =~ /^x/