| blib/lib/HTTP/OAI/Identify.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 20 | 85.0 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 4 | 60 | if ($elem eq 'description' and not $$self{"in_$elem"}) |
| 58 | 64 | 0 | if (defined $text) |
| 64 | 32 | 32 | if (defined $self->get_handler) { } |
| 4 | 28 | elsif ($elem eq 'adminEmail') { } | |
| 0 | 28 | elsif ($elem eq 'compression') { } | |
| 4 | 24 | elsif ($elem eq 'baseURL') { } | |
| 4 | 20 | elsif ($elem eq 'protocolVersion') { } | |
| 16 | 4 | elsif (defined $text and length $text) { } | |
| 65 | 4 | 28 | if ($elem eq 'description' and $$self{"in_$elem"} == $hash->{'Depth'}) |
| 76 | 4 | 0 | if $text =~ /\D/ or $text < 2 |