Branch Coverage

blib/lib/Biblio/SICI/ContributionSegment.pm
Criterion Covered Total %
branch 13 18 72.2


line true false branch
27 0 26 if (not $newVal =~ /\A$Biblio::SICI::Util::TITLE_CODE+\Z/) { }
44 0 27 if (length $newVal > 6)
48 0 27 unless ($newVal =~ /\A$Biblio::SICI::Util::TITLE_CODE+\Z/)
52 0 27 if (@problems) { }
68 0 4 if (not $newVal =~ /\A$Biblio::SICI::Util::TITLE_CODE+\Z/) { }
83 76 103 if ($self->has_location)
87 79 100 if ($self->has_titleCode)
91 12 167 if ($self->has_localNumber)
92 6 6 if ($self->has_location or $self->has_titleCode) { }