From: Wolfgang Bumiller <w.bumiller@proxmox.com>
Date: Thu, 15 Nov 2018 09:28:00 +0000 (+0100)
Subject: style fixup
X-Git-Url: https://git.proxmox.com/?a=commitdiff_plain;h=3b6c2b725ec9a59efd6def05435c157dc2ca8204;p=pmg-api.git

style fixup

Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
---

diff --git a/PMG/Statistic.pm b/PMG/Statistic.pm
index bdeac92..ac9473f 100755
--- a/PMG/Statistic.pm
+++ b/PMG/Statistic.pm
@@ -781,15 +781,15 @@ sub postscreen_stat_graph {
     $sth->execute ();
 
     while (my $ref = $sth->fetchrow_hashref()) {
-	@$res[$ref->{index}] = $ref;
+	$res->[$ref->{index}] = $ref;
     }
 
     my $c = int (($to - $from) / $span);
 
-    for (my $i = 0; $i < $c; $i++) {
-	@$res[$i] //= { index => $i, rbl_rejects => 0, pregreet_rejects => 0};
+    for my $i (0..$c) {
+	$res->[$i] //= { index => $i, rbl_rejects => 0, pregreet_rejects => 0};
 
-	my $d = @$res[$i];
+	my $d = $res->[$i];
 	$d->{time} = $from + $i*$span - $timezone;
     }
     $sth->finish();