line |
true |
false |
branch |
25
|
3 |
3 |
if ($import_kind ne 'internal') |
27
|
0 |
3 |
if $@ |
38
|
6 |
0 |
defined $domain ? : |
|
63 |
103 |
defined $domain ? : |
|
66 |
166 |
$name =~ /\.$/ ? : |
|
6 |
232 |
$name eq '@' ? : |
44
|
10 |
29 |
if $fq eq $domain |
46
|
28 |
1 |
if substr($local, -length($domain) - 1, length($domain) + 1, '') eq ".$domain" |
57
|
0 |
43 |
unless $_[0] =~ /(\d+)([hmsdw])/ and $1 * {'s', 1, 'm', 60, 'h', 3600, 'd', 86400, 'w', 604800}->{$2} |
62
|
15 |
3 |
if length $t < 255 |
107
|
3 |
0 |
$rr eq 'soa' ? : |
|
3 |
3 |
$rr eq 'rp' ? : |
|
9 |
6 |
$rr eq 'cname' ? : |
|
33 |
15 |
$rr eq 'a' ? : |
|
3 |
9 |
ref $val eq 'ARRAY' ? : |
|
3 |
0 |
$rr eq 'srv' ? : |
|
3 |
3 |
$rr eq 'ns' ? : |
|
3 |
6 |
$rr eq 'mx' ? : |
|
12 |
9 |
$rr eq 'txt' ? : |
|
48 |
21 |
$rr eq 'a' || $rr eq 'cname' || $rr eq 'rp' || $rr eq 'soa' ? : |
114
|
0 |
3 |
ref $$val{$_} eq 'ARRAY' ? : |