| blib/lib/Mail/Message/Field/URIs.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 18 | 61.1 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 3 | 0 | if ($body = delete $args->{'body'}) |
| 27 | 0 | 3 | ref $body eq 'ARRAY' ? : |
| 28 | 0 | 3 | unless @body |
| 33 | 2 | 1 | if (@body > 1 or ref $body[0]) { } |
| 1 | 0 | elsif (defined $body) { } | |
| 37 | 0 | 1 | unless index($body, '<') >= 0 |
| 54 | 3 | 0 | @uris ? : |
| 62 | 2 | 3 | ref $_[0] ? : |
| 63 | 5 | 0 | if defined $uri |