| blib/lib/SeeAlso/Identifier/PND.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 23 | 26 | 88.4 |
| line | true | false | branch |
|---|---|---|---|
| 97 | 149 | 0 | if ref $_ and scalar @_ |
| 99 | 0 | 151 | unless defined $_ |
| 107 | 52 | 99 | unless /^1[01]?\d{7}[\dX]$/ |
| 121 | 147 | 19 | if defined $value |
| 136 | 24 | 210 | unless $_[0]{'value'} and $_[0]{'value'} =~ /^1[01]?\d{7}[\dX]$/ |
| 138 | 30 | 180 | if $i[0] =~ /X/i |
| 157 | 49 | 35 | if (defined $_[0]) |
| 158 | 21 | 28 | if ($_[0] =~ /^1[01]?\d{7}[\dXx]$/) { } |
| 163 | 43 | 13 | $self->valid ? : |
| 190 | 51 | 88 | if (defined $_[0]) |
| 191 | 43 | 8 | if ($_[0] =~ m[^http://d-nb.info/gnd/]) { } |
| 196 | 96 | 35 | $self->valid ? : |
| 239 | 13 | 0 | $self->valid ? : |