Branch Coverage

blib/lib/UML/Sequence/SimpleSeq.pm
Criterion Covered Total %
branch 16 30 53.3


line true false branch
117 0 6 unless open FILE, "$file"
126 84 3 unless $in_annot or m[^\s*/\*]
135 0 3 if ($in_annot) { }
3 0 elsif (m[^\s*/\*]) { }
144 3 0 if m[\*/\s*$]
174 0 84 if $line =~ /^\s*$/
184 3 81 if $line eq ''
209 0 0 wantarray ? :
0 29 if $line =~ /^\s*->\s*(.+)$/
214 0 29 if $line =~ s[\s*/\*\s*(.*)\s*\*/\s*$][]
218 0 0 if $1 eq '*'
220 0 0 if $1 eq '!'
229 0 29 if $line =~ s/->\s*(.*)$//
235 28 1 if (defined $method)
240 12 17 wantarray ? :