Branch Coverage

blib/lib/JCAMP/DX.pm
Criterion Covered Total %
branch 13 16 81.2


line true false branch
47 4 28 if $line =~ /^\s*$/
48 3 25 if ($line =~ s/^\s*##title=//i) { }
23 2 elsif ($line =~ /^\s*##([^=]+)=(.*)$/) { }
2 0 elsif ($block->{'labels'}) { }
65 14 1 unless exists $block->{'data'}{$_}
79 1 0 if (grep {$_ eq $label;} @records_with_variable_lists)
85 1 0 if ($record_now->{'variable_list'} and $record_now->{'variable_list'} =~ /^\((.)\+\+\((.)\.\.\2\)\)$/)
96 1 1 if ($i < $#checkpoints)