Branch Coverage

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


line true false branch
62 2181 225060 if ($_[1])
76 9 1 if $_[0]{'ID'}
90 1 1 if $_[0]{'ID'}
104 1 1 if $_[0]{'ID'}
118 2164 13479 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 1345 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 2115 if (scalar @_ > 1) { }
14 2101 elsif (scalar @_ == 1) { }
240 193 3788 if (defined $_[1])
255 1 3435 if (scalar @_ > 1) { }
37 3398 elsif (scalar @_ == 1) { }
278 0 2122 unless (defined $term_name)
288 9 3691 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 2118 0 unless ($syn_found or $synonym->scope eq 'EXACT' and $synonym->def->text eq $term_name)
313 0 2118 unless $$self{'SYNONYM_SET'}->add($synonym)
331 2119 0 if ($_[1] and $_[2] and $_[3])
348 5859 0 if ($syn_scope) { }
350 26 5833 if ($syn_type_name) { }
375 1 4572 if $_[1]
391 1170 2699 if ($xref_as_string)
395 0 1170 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 5 2711 if $_[1]
540 6 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 1178 unless caller eq 'OBO::Core::Term'
690 8 1178 if ($entry =~ /$r_db_acc$r_desc$r_mod?/) { }
1178 0 elsif ($entry =~ /$r_db_acc$r_desc?$r_mod?/) { }
694 3 5 if $4
698 0 1178 if $3
699 0 1178 if $4
706 8 1178 if defined $desc
707 3 1183 if defined $mod
714 0 2383 unless caller eq 'OBO::Core::Term'