X-Git-Url: https://git.proxmox.com/?p=pve-firewall.git;a=blobdiff_plain;f=src%2FPVE%2FFirewall.pm;h=035dc7e7a96d1a248997246da8618bb6a649ff1a;hp=ef00d0ce6d31ee82ddad66a2c822c0c094d2753c;hb=aced7e7d67c62d903244ec1cb3c01a5ff7b30781;hpb=81d13a9d36ab6302ff8b4b4af092a6d35edc2da4 diff --git a/src/PVE/Firewall.pm b/src/PVE/Firewall.pm index ef00d0c..035dc7e 100644 --- a/src/PVE/Firewall.pm +++ b/src/PVE/Firewall.pm @@ -1049,12 +1049,12 @@ sub parse_port_name_number_or_range { my @elements = split(/,/, $str); die "extraneous commas in list\n" if $str ne join(',', @elements); foreach my $item (@elements) { - if ($item =~ m/^(\d+):(\d+)$/) { + if ($item =~ m/^([0-9]+):([0-9]+)$/) { $count += 2; my ($port1, $port2) = ($1, $2); die "invalid port '$port1'\n" if $port1 > 65535; die "invalid port '$port2'\n" if $port2 > 65535; - } elsif ($item =~ m/^(\d+)$/) { + } elsif ($item =~ m/^([0-9]+)$/) { $count += 1; my $port = $1; die "invalid port '$port'\n" if $port > 65535;