ovf import: small code style cleanups

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>

diff --git a/src/PVE/GuestImport/OVF.pm b/src/PVE/GuestImport/OVF.pm
index 49cae176161c63c5e0e342b183ab6b832e909614..03baa906d3ebb795e41ad9b1d7500be4f9c14df0 100644 (file)
--- a/src/PVE/GuestImport/OVF.pm
+++ b/src/PVE/GuestImport/OVF.pm
@@ -228,7 +228,7 @@ sub parse_ovf {
     # here we expect multiple results, so we do not read the element value with
     # findvalue() but store multiple elements with findnodes()
     my $disk_id = dtmf_name_to_id('Disk Drive');
-    my $xpath_find_disks="/ovf:Envelope/ovf:VirtualSystem/ovf:VirtualHardwareSection/ovf:Item[rasd:ResourceType=${disk_id}]";
+    my $xpath_find_disks = "/ovf:Envelope/ovf:VirtualSystem/ovf:VirtualHardwareSection/ovf:Item[rasd:ResourceType=${disk_id}]";
     my @disk_items = $xpc->findnodes($xpath_find_disks);
 
     my $xpath_find_ostype_id = "/ovf:Envelope/ovf:VirtualSystem/ovf:OperatingSystemSection/\@ovf:id";
@@ -253,12 +253,8 @@ sub parse_ovf {
 
     my $boot_order = [];
 
-    foreach my $item_node (@disk_items) {
-
-       my $disk_node;
-       my $file_node;
-       my $controller_node;
-       my $pve_disk;
+    for my $item_node (@disk_items) {
+       my ($disk_node, $file_node, $controller_node, $pve_disk);
 
        print "disk item:\n", $item_node->toString(1), "\n" if $debug;