lib/Email/Address/Classify.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 2 | 6 | 33.3 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
143 | 0 | 0 | 40 | $self->{'valid'} and length $self->{'localpart'} >= $min_length |
160 | 0 | 0 | 40 | defined $email and $email =~ /^((?:[a-zA-Z0-9\+\_\=\.\-])+)@((?:[a-zA-Z0-9\-])+(?:\.[a-zA-Z0-9\-]+)+)$/ |