Branch Coverage

blib/lib/SeeAlso/Identifier/ISSN.pm
Criterion Covered Total %
branch 0 24 0.0


line true false branch
72 0 0 if ref $_ and scalar @_
74 0 0 unless defined $_
78 0 0 unless ($testok)
85 0 0 unless defined $_
86 0 0 unless $_->is_valid
99 0 0 ${$_[0];} eq '' ? :
117 0 0 if (scalar @_) { }
119 0 0 defined $value ? :
120 0 0 if not $value =~ /^[0-9]+$/ or $value >= 9999999
122 0 0 if ($value eq '')
132 0 0 length $v == 8 ? :
144 0 0 unless my $value = 'Business::ISSN'->new($self->value)