Add somes comments

defacement_check.pl

@@ -112,7 +112,7 @@ foreach $file (@files)
       }
     }
 
-    # Results
+    # Views results
     foreach (uniq(@found)) {
       $total_found++;
       print "\033[33m[" . $total_found . "]\t\t" . $_ . "\n"; # VERBOSE
@@ -125,13 +125,13 @@ foreach $file (@files)
     }
   }
   close(FH);
-  print "\033[36mTREATH detected on this site \t\t\t\t=> [" . $somme_total_found . "]\n\n";
+  print "\033[36mTREATH detected on this site \t\t\t\t=> [" . $somme_total_found . "]\n\n"; # Total
   $grand_total_found = $somme_total_found + $grand_total_found;
 }
 
-print "\033[36mGrand Total TREATH detected on ALL website \t\t=> [" . $grand_total_found . "]\n\n";
+# print "\033[36mGrand Total TREATH detected on ALL website \t\t=> [" . $grand_total_found . "]\n\n"; # Grand Total
 
-# Print results in Output file
+# Print just the last binaire results in output file
 open(my $out, '>', 'out.txt');
 print $out $grand_total_found;
 close $out;