| 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) |