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