| line |
true |
false |
branch |
|
27
|
10 |
0 |
unless (defined $self->{'min_len'}) |
|
29
|
9 |
1 |
unless (defined $self->{'max_len'}) |
|
32
|
1 |
9 |
if ($self->{'allow_ip'}) |
|
41
|
9 |
21 |
if (defined $self->{$_}) |
|
44
|
6 |
4 |
unless (defined $self->{'tldcheck'}) |
|
47
|
1 |
9 |
if ($self->{'mxcheck'}) |
|
65
|
5 |
5 |
if ($errors =~ /fqdn/) |
|
67
|
1 |
9 |
if ($errors =~ /rfc822/) |
|
68
|
0 |
1 |
if ($string =~ /\@/) { } |
|
73
|
1 |
9 |
if ($errors =~ /tld/) |
|
77
|
3 |
7 |
if ($errors =~ /mx/) |
|
86
|
2 |
10 |
if ($self->{'string'} =~ /$String::Validator::Email::RE{'net'}{'IPv4'}/) |
|
95
|
1 |
20 |
if ($self->CheckCommon($string1, $string2)) |
|
101
|
7 |
13 |
unless $addr |
|
102
|
7 |
13 |
if ($fail) { } |
|
108
|
12 |
1 |
unless ($self->{'allow_ip'}) |
|
114
|
6 |
14 |
if ($self->{'mxcheck'}) |
|
115
|
5 |
1 |
if ($self->{'error'} == 0) |
|
116
|
3 |
2 |
unless (mx($self->{'NetDNS'}, $self->{'maildomain'})) |