Branch Coverage

blib/lib/OBO/Core/Term.pm
Criterion Covered Total %
branch 93 118 78.8


line true false branch
62 2182 225077 if ($_[1])
76 9 1 if $_[0]{'ID'}
90 1 1 if $_[0]{'ID'}
104 1 1 if $_[0]{'ID'}
118 2165 13485 if ($_[1])
132 12 0 if (defined $_[1] and $_[1] == 1 || $_[1] == 0)
133 8 2748 $_[0]{'IS_ANONYMOUS'} && $_[0]{'IS_ANONYMOUS'} == 1 ? :
147 1 3403 if (scalar @_ > 1) { }
11 3392 elsif (scalar @_ == 1) { }
165 1346 6401 if $_[1]
181 8 536 if (defined $_[1] and defined $dbxref_as_string)
187 0 8 if ($e == -1)
204 539 5 if (defined $d) { }
222 0 2116 if (scalar @_ > 1) { }
15 2101 elsif (scalar @_ == 1) { }
240 194 3788 if (defined $_[1])
255 1 3435 if (scalar @_ > 1) { }
37 3398 elsif (scalar @_ == 1) { }
278 0 2128 unless (defined $term_name)
288 9 3706 if ($s->def->text eq $synonym->def->text)
292 6 3 if ($synonym_type_name or $s_type_name) { }
293 1 2 if ($s_type_name and $synonym_type_name and $s_type_name eq $synonym_type_name)
312 2124 0 unless ($syn_found or $synonym->scope eq 'EXACT' and $synonym->def->text eq $term_name)
313 0 2124 unless $self->{'SYNONYM_SET'}->add($synonym)
331 2125 0 if ($_[1] and $_[2] and $_[3])
348 5880 0 if ($syn_scope) { }
350 26 5854 if ($syn_type_name) { }
375 1 4579 if $_[1]
391 1176 2700 if ($xref_as_string)
395 0 1176 if ($e == -1)
467 0 3389 if (scalar @_ > 1) { }
4 3385 elsif (scalar @_ == 1) { }
486 0 3387 if (scalar @_ > 1) { }
2 3385 elsif (scalar @_ == 1) { }
505 1 3401 if (scalar @_ > 1) { }
15 3386 elsif (scalar @_ == 1) { }
523 6 2711 if $_[1]
540 7 2712 if $_[1]
555 1 2692 if $_[1]
573 1 2692 if $_[1]
587 31 0 if (defined $_[1] and $_[1] == 1 || $_[1] == 0)
588 43 3378 $_[0]{'IS_OBSOLETE'} && $_[0]{'IS_OBSOLETE'} == 1 ? :
602 0 3385 if (scalar @_ > 1) { }
0 3385 elsif (scalar @_ == 1) { }
621 0 3385 if (scalar @_ > 1) { }
0 3385 elsif (scalar @_ == 1) { }
639 8 0 if (defined $_[1] and $_[1] == 1 || $_[1] == 0)
640 0 2746 $_[0]{'BUILTIN'} && $_[0]{'BUILTIN'} == 1 ? :
653 34 0 if ($_[1] and eval { do { $_[1]->isa('OBO::Core::Term') } }) { }
654 34 0 defined $_[1] && $_[0]{'ID'} eq $_[1]{'ID'} ? :
661 0 1184 unless caller eq 'OBO::Core::Term'
690 8 1184 if ($entry =~ /$r_db_acc$r_desc$r_mod?/) { }
1184 0 elsif ($entry =~ /$r_db_acc$r_desc?$r_mod?/) { }
694 3 5 if $4
698 0 1184 if $3
699 0 1184 if $4
706 8 1184 if defined $desc
707 3 1189 if defined $mod
714 0 2395 unless caller eq 'OBO::Core::Term'