hosts-state: Fix perl warning

Perl 5.20 introduces new a warning:
> push on reference is experimental

1 files changed, 3 insertions, 3 deletions

diff --git a/hosts-state b/hosts-state
index 1ef151e..2bb4aee 100755
--- a/hosts-state
+++ b/hosts-state
@@ -42,18 +42,18 @@ while(<$reports>) {
     if ($dt < $stale) {
         $msg = "CRITICAL $host is stale";
         $status = 2;
-        push($summary->{stale}, $short_host);
+        push(@{$summary->{stale}}, $short_host);
     }
     else {
         if ($bad > 0) {
             $msg = "CRITICAL $bad bad entries";
             $status = 2;
-            push($summary->{bad}, $short_host);
+            push(@{$summary->{bad}}, $short_host);
         }
         else {
             $msg = "OK Total managed entries: $total (extra: $extra)";
             $status = 0;
-            push($summary->{clean}, $short_host);
+            push(@{$summary->{clean}}, $short_host);
         }
     }