From c9536959ab906ff7df40c3994bb0022330a6966e Mon Sep 17 00:00:00 2001 From: Stefan Hrdlicka Date: Tue, 13 Dec 2022 16:14:19 +0100 Subject: [PATCH] cleanup: don't capture "/xx" of CIDR Signed-off-by: Stefan Hrdlicka --- src/PVE/Firewall.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/PVE/Firewall.pm b/src/PVE/Firewall.pm index ae5f221..4924d51 100644 --- a/src/PVE/Firewall.pm +++ b/src/PVE/Firewall.pm @@ -68,7 +68,7 @@ PVE::JSONSchema::register_format('IPorCIDR', \&pve_verify_ip_or_cidr); sub pve_verify_ip_or_cidr { my ($cidr, $noerr) = @_; - if ($cidr =~ m!^(?:$IPV6RE|$IPV4RE)(/(\d+))?$!) { + if ($cidr =~ m!^(?:$IPV6RE|$IPV4RE)(?:/\d+)?$!) { # Net::IP throws an error if the masked CIDR part isn't zero, e.g., `192.168.1.155/24` # fails but `192.168.1.0/24` succeeds. clean_cidr removes the non zero bits from the CIDR. my $clean_cidr = clean_cidr($cidr); -- 2.39.2