From e107e901234d3ba4572752c082ccfac3e454c0d1 Mon Sep 17 00:00:00 2001 From: ageissler Date: Mon, 3 Mar 2025 11:43:26 +0100 Subject: [PATCH] pve-reporting/get_vminfo_clu2.pl aktualisiert --- pve-reporting/get_vminfo_clu2.pl | 32 ++++++++++++++++++++++++++++---- 1 file changed, 28 insertions(+), 4 deletions(-) diff --git a/pve-reporting/get_vminfo_clu2.pl b/pve-reporting/get_vminfo_clu2.pl index c0ef7aa..62f0e97 100644 --- a/pve-reporting/get_vminfo_clu2.pl +++ b/pve-reporting/get_vminfo_clu2.pl @@ -47,17 +47,41 @@ for $server (@servers) { print "\n"; } -#print Dumper(%vms); - open HTML, ">output2.html"; -printf HTML "\n\n"; +printf HTML "\n\n\n"; +printf HTML ' + + + + + + +'; +printf HTML "\n\n"; + open OUTPUT, ">output2.txt"; print "-- print vm information to console and in file output2.txt\n"; $str = sprintf "VMID|NAME|OS|DISKSIZE(S)|DISKUSAGE(S)|SOCKETS|CORES|MEMORY(MB)|BOOTDISK(GB)|DESCRIPTION|TAGS|STATUS|HOST|PID|CDROM\n"; printf $str; printf OUTPUT $str; -$str = sprintf "\n\n"; +$str = sprintf "
VMIDNAMEOSDISKSIZE(S)DISKUSAGE(S)SOCKETSCORESMEMORY(MB)BOOTDISK(GB)DESCRIPTIONTAGSSTATUSHOSTPIDCDROM
\n\n"; printf HTML $str; foreach $vm (sort keys %vms) { $str = sprintf ("%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s|%s\n",
VMIDNAMEOSDISKSIZE(S)DISKUSAGE(S)SOCKETSCORESMEMORY(MB)BOOTDISK(GB)DESCRIPTIONTAGSSTATUSHOSTPIDCDROM