| line |
true |
false |
branch |
|
28
|
1 |
0 |
unless open my $handle, "<$encoding", $file_name |
|
37
|
0 |
108 |
unless open my $handle, "<$encoding", \$string_value |
|
51
|
0 |
0 |
if ($@) |
|
68
|
0 |
0 |
if ($response->is_success or $response->status_line =~ /304/) { } |
|
85
|
7 |
109 |
if ($args{'-handle'}) { } |
|
|
1 |
108 |
elsif ($args{'-file'}) { } |
|
|
108 |
0 |
elsif ($args{'-string'}) { } |
|
|
0 |
0 |
elsif ($args{'-url'}) { } |
|
114
|
0 |
113 |
if ($args{'-project'}) { } |
|
|
24 |
89 |
elsif ($args{'-as_project'}) { } |
|
132
|
2 |
114 |
if ($class eq 'Bio::Phylo::Parsers::Abstract') |
|
133
|
1 |
1 |
if (my $format = _guess_format(_open_handle(%args))) { } |
|
170
|
84 |
29 |
if ($self->_return_is_scalar) { } |
|
172
|
10 |
74 |
if (my $p = $self->_project) { } |
|
173
|
0 |
10 |
if (my $meta = $self->_project_meta) |
|
184
|
14 |
13 |
if (my $p = $self->_project) { } |
|
185
|
0 |
14 |
if (my $meta = $self->_project_meta) |
|
215
|
584 |
0 |
if (my $h = $self->{'_handlers'}) |
|
216
|
584 |
0 |
defined $type ? : |
|
224
|
1 |
1 |
if ($line =~ /^#nexus/i) { } |
|
|
0 |
1 |
elsif ($line =~ /^<[^>]*nexml/) { } |
|
|
0 |
1 |
elsif ($line =~ /^<[^>]*phyloxml/) { } |
|
|
0 |
1 |
elsif ($line =~ /^\s*\d+\s+\d+\s*$/) { } |
|
|
0 |
1 |
elsif ($line =~ /^>/) { } |
|
|
0 |
1 |
elsif ($line =~ /^\@/) { } |
|
|
0 |
1 |
elsif ($line =~ /^\s*\(/) { } |
|
|
0 |
1 |
elsif ($line =~ /<\? xml/) { } |
|
244
|
0 |
0 |
if ($line =~ /{/) |
|
250
|
0 |
0 |
if ($line =~ /^<[^>]*nexml/) { } |
|
|
0 |
0 |
elsif ($line =~ /^<[^>]*phyloxml/) { } |