Branch Coverage

blib/lib/Music/PitchNum/ABC.pm
Criterion Covered Total %
branch 20 22 90.9


line true false branch
50 1 9 unless looks_like_number $number
55 4 5 if $octave > 4
56 2 7 if $octave > 5
57 4 5 if $octave < 4
66 0 11 if looks_like_number $name
70 11 0 if ($name =~ / (? (?: [_]{1,2} | [\^]{1,2} ) )? (?: (?[A-G])(?[,]+)? | (?[a-g])(?[']+)? ) /x)
77 4 7 $note =~ /[A-G]/ ? :
79 5 6 if (defined $octave)
80 3 2 $octave =~ /[,]/ ? :
83 4 7 if (defined $chrome)
84 2 2 $chrome =~ /[_]/ ? :