From 67c01c9971fc64124e1b880b2ac90c61594e3052 Mon Sep 17 00:00:00 2001
From: Heuzef <contact@heuzef.com>
Date: Thu, 31 Oct 2019 11:02:25 +0100
Subject: [PATCH] Try with scalar (There are enough backup ?)

---
 Check.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Check.pm b/Check.pm
index 1906fc6..30bfcc9 100644
--- a/Check.pm
+++ b/Check.pm
@@ -107,7 +107,7 @@ sub action
       my $sizeConsistencyColor = "Tomato";
       my $sizeConsistency = "<strong>ANOMALOUS</strong>";
 
-      if ( $Backups[-4] ) { # There are enough backup ?
+      if ( scalar @Backups > 4 ) { # There are enough backup ?
 
         # TOO BIG ? If the size is 6 times higher than usual :
         if ( $new_size > ($new_size_q3 + ($new_size_q3 - $new_size_q1) ) * 1.5 and $new_size > $new_size_avg * 6 ) {