Don't use ~~ as not all perl versions support it

This commit is contained in:
Jamie Cameron
2017-10-21 17:50:57 -07:00
parent 68e185549d
commit c105e2b011

View File

@@ -539,7 +539,7 @@ sub external_firewall_message
if ($filter->{'defaults'}->{'INPUT_ZONES'}) {
$fwname.='firewalld ';
}
if ($filter->{'defaults'} ~~ /^f2b-|^fail2ban-/ && ! $config{'filter_chain'} ) {
if ($filter->{'defaults'} =~ /^f2b-|^fail2ban-/ && !$config{'filter_chain'} ) {
$fwname.='fail2ban ';
}
# warning about not using direct