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