Try with scalar (There are enough backup ?)

5 years ago · 67c01c9971
parent e3621df7ad
commit 67c01c9971
1 changed files with 1 additions and 1 deletions
--- 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 ) {