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