From a3cbd3d15043b555ae76a003cd749e4bca42bfa4 Mon Sep 17 00:00:00 2001
From: Heuzef <contact@heuzef.com>
Date: Wed, 25 Sep 2019 14:42:13 +0200
Subject: [PATCH] Add debug

---
 backuppc_check.pl | 62 +++++++++++++++++++++++++++++++++++++++++++++++++++----
 1 file changed, 58 insertions(+), 4 deletions(-)

diff --git a/backuppc_check.pl b/backuppc_check.pl
index acf3e21..7b8e489 100644
--- a/backuppc_check.pl
+++ b/backuppc_check.pl
@@ -95,8 +95,24 @@ else {
   $toobig = "1";
 }
 
-print("\ntoobig : $toobig\n");
-print("\ntoosmall : $toosmall\n");
+
+# Debug
+print("\n----------------\n");
+print("DEBUG");
+print("\n");
+print("new_size : $json->{new_size}");
+print("\n");
+print("new_size_q1 : $json->{new_size_q1}");
+print("\n");
+print("new_size_q3 : $json->{new_size_q3}");
+print("\n");
+print("new_size_avg : $json->{new_size_avg}");
+print("\n");
+print("toobig : $toobig\n");
+print("\n");
+print("toosmall : $toosmall\n");
+print("\n----------------\n");
+# /Debug
 
 
 # TOO SMALL ?
@@ -108,8 +124,25 @@ else {
   $toosmall = "1";
 }
 
-print("\ntoobig : $toobig\n");
-print("\ntoosmall : $toosmall\n");
+
+# Debug
+print("\n----------------\n");
+print("DEBUG");
+print("\n");
+print("new_size : $json->{new_size}");
+print("\n");
+print("new_size_q1 : $json->{new_size_q1}");
+print("\n");
+print("new_size_q3 : $json->{new_size_q3}");
+print("\n");
+print("new_size_avg : $json->{new_size_avg}");
+print("\n");
+print("toobig : $toobig\n");
+print("\n");
+print("toosmall : $toosmall\n");
+print("\n----------------\n");
+# /Debug
+
 
 # Print result
 if ( $toobig or $toosmall ) {
@@ -121,4 +154,25 @@ else {
 print("\n");
 print("Random file : ..........");
 print("\n----------------\n");
+
+
+# Debug
+print("\n----------------\n");
+print("DEBUG");
+print("\n");
+print("new_size : $json->{new_size}");
+print("\n");
+print("new_size_q1 : $json->{new_size_q1}");
+print("\n");
+print("new_size_q3 : $json->{new_size_q3}");
+print("\n");
+print("new_size_avg : $json->{new_size_avg}");
+print("\n");
+print("toobig : $toobig\n");
+print("\n");
+print("toosmall : $toosmall\n");
+print("\n----------------\n");
+# /Debug
+
+
 exit(0);