| lib/Value/Object/EmailAddress.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 10 | 70.0 |
| line | true | false | branch |
|---|---|---|---|
| 16 | 1 | 7 | unless defined $value |
| 17 | 1 | 6 | unless $value =~ tr/@// |
| 23 | 0 | 6 | if defined $why |
| 29 | 0 | 6 | if defined $why |
| 51 | 3 | 0 | if (defined $value and $value =~ tr/@//) |