Branch Coverage

Bio/Matrix/IO/scoring.pm
Criterion Covered Total %
branch 21 28 75.0


line true false branch
107 0 65 if /^\s*$/
108 15 50 if (/^\#/) { }
2 48 elsif (s/^\s+(\S+)/$1/) { }
48 0 elsif ($inmatrix) { }
109 0 15 if ($inmatrix)
113 1 14 if (/Entropy\s+\=\s+(\S+)\,\s+ Expected\s+\=\s+(\S+)/ox) { }
1 13 elsif (/Expected\s+score\s+\=\s+(\S+)\, \s+Entropy\s+\=\s+(\S+)/ox) { }
1 12 elsif (/(PAM\s+\d+)\s+substitution.+ scale\s+\=\s+(\S+)\s+\=\s+(\S+)/ox) { }
1 11 elsif (/Blocks Database\s+\=\s+(\S+)/o) { }
1 10 elsif (/(\S+)\s+Bit\s+Units/ox) { }
0 10 elsif (/Lowest score\s+\=\s+(\S+)\,\s+ Highest score\s+\=\s+(\S+)/ox) { }
0 10 elsif (/(Lambda)\s+\=\s+(\S+)\s+bits\, \s+(H)\s+\=\s+(\S+)/ox) { }
142 0 2 if ($cols[0] ne 'A')
147 0 48 unless (/^(\S+)/)