| blib/lib/Class/Value/Contact/EmailAddress.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 2 | 3 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 14 | 10 | 0 | 5 | $self->SUPER::is_well_formed_value($value) && 'Email::Valid'->address($value) && $value =~ /^[^\@]+\@[^\@]+$/ && length $value <= 255 |