Merge pull request #250 from dani/warn_inplicit_split
Prevent a "Use of implicit split" warning
This commit is contained in:
commit
044fff9aa8
@ -521,7 +521,8 @@ sub check_name_match {
|
||||
my ($dns_name, $helo_name) = @_;
|
||||
|
||||
return if !$dns_name;
|
||||
return if split(/\./, $dns_name) < 2; # not a FQDN
|
||||
my @dots = split(/\./, $dns_name);
|
||||
return if scalar @dots < 2; # not a FQDN
|
||||
|
||||
if ($dns_name eq $helo_name) {
|
||||
$self->log(LOGDEBUG, "reverse name match");
|
||||
|
Loading…
Reference in New Issue
Block a user