Branch Coverage

Bio/TreeIO/nexus.pm
Criterion Covered Total %
branch 16 76 21.0


line true false branch
112 0 9 defined $hdr ? :
113 0 9 defined $trans ? :
129 9 30 unless ($self->{'_parsed'})
146 0 9 if /^\s+$/
149 0 9 unless defined $_
151 0 9 unless (/^\#NEXUS/i)
163 0 13 if ($self->verbose > 0) { }
172 13 0 if ($s =~ /begin trees;(.+)(end;)?/is) { }
174 12 1 if ($trees =~ s/\s+translate\s+([^;]+);//i) { }
182 158 0 if ($n =~ /^\s*(\S+)\s+(.+)$/)
210 37 0 if defined $tree_name
218 0 9 if (not @sections)
236 0 0 if ($self->header)
246 0 0 if ($first == 0 and $translate)
263 0 0 unless ($data[-1] =~ /\)$/)
271 0 0 $tree->get_root_node ? :
281 0 0 if $self->_flush_on_write and defined $self->_fh
287 0 0 unless defined $node
293 0 0 if (@data > 1) { }
299 0 0 if $node->has_tag('color') or $node->has_tag('label')
302 0 0 if defined $comment_flag
304 0 0 if ($node->has_tag('color'))
309 0 0 if ($node->has_tag('label'))
311 0 0 if $comment_flag
314 0 0 if defined $comment_flag
321 0 0 if (not defined $bl) { }
0 0 elsif ($bl =~ /\#/) { }
329 0 0 if (defined($b = $node->bootstrap)) { }
0 0 elsif (defined($b = $node->id)) { }
333 0 0 if $node2num->{$b}
334 0 0 if defined $b
339 0 0 if (defined $node->id or defined $node->branch_length)
340 0 0 defined $node->id ? :
341 0 0 if (length $id and $node2num->{$id})
344 0 0 if ($node->has_tag('color'))
348 0 0 defined $node->branch_length ? :
374 9 0 if @_
393 9 0 if @_