diff --git a/Shorewall/Perl/Shorewall/IPAddrs.pm b/Shorewall/Perl/Shorewall/IPAddrs.pm index a2b68e232..56f9f225d 100644 --- a/Shorewall/Perl/Shorewall/IPAddrs.pm +++ b/Shorewall/Perl/Shorewall/IPAddrs.pm @@ -301,7 +301,7 @@ sub validate_port( $$ ) { my $value; - if ( $port =~ /^(\d+)$/ ) { + if ( $port =~ /^(\d+)$/ || $port =~ /^0x/ ) { $port = numeric_value $port; return $port if defined $port && $port && $port <= 65535; } else {