From ebadda7d4e614c99979bdeebca91454db8220fad Mon Sep 17 00:00:00 2001
From: Heuzef <contact@heuzef.com>
Date: Fri, 25 Oct 2019 16:37:07 +0200
Subject: [PATCH] Add some comment

---
 Check.pm | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/Check.pm b/Check.pm
index 5cefce2..eee1b44 100644
--- a/Check.pm
+++ b/Check.pm
@@ -102,13 +102,14 @@ sub action
         $new_size_q3       = eval { int $sizes->quantile(3) } || 0;
       }
 
-      # TOO BIG ?
+      # Using a mathematical formula to calculate the consistency of the average size, for new files, on all backups
+      # TOO BIG ? If the size is 6 times higher than usual :
       my $toobig = 0;
       if ( $new_size > ($new_size_q3 + $new_size_q3 - $new_size_q1) * 1.5 or $new_size > $new_size_avg * 6 ) {
         $toobig = 1;
       }
-
-      # TOO SMALL ?
+      
+      # TOO SMALL ? If the size is 3 times lower than usual :
       my $toosmall = 0;
       if ( $new_size < ($new_size_q1 - $new_size_q3 - $new_size_q1) * 1.5 or $new_size < $new_size_avg / 3 ) {
         $toosmall = 1;