fix net regex in qm cleanup

[qemu-server.git] / PVE / CLI / qm.pm

diff --git a/PVE/CLI/qm.pm b/PVE/CLI/qm.pm
index 6a2e1618c1514c0ce52df26fa1a9f88fbead36b6..ca5d25fc1ad0c6afd5b28867edfb843bc7beb50b 100755 (executable)
--- a/PVE/CLI/qm.pm
+++ b/PVE/CLI/qm.pm
@@ -809,7 +809,7 @@ __PACKAGE__->register_method({
                # we have to cleanup the tap devices after a crash
 
                foreach my $opt (keys %$conf) {
-                   next if $opt !~  m/^net(\d)+$/;
+                   next if $opt !~  m/^net(\d+)$/;
                    my $interface = $1;
                    PVE::Network::tap_unplug("tap${vmid}i${interface}");
                }