Add verbose mode (--verbose)

defacement_check.pl

@@ -62,7 +62,9 @@ foreach $file (@files)
     # Results
     foreach (uniq(@found)) {
       $total_found++;
-      # print $total_found . " : " . $_ . "\n"; # VERBOSE MODE
+      if ($ARGV[0] eq '--verbose') {
+        print "\033[36m" . $total_found . " : " . $_ . "\n";
+      }
     }
     if ($total_found == 0) {
       print "\033[32m" . $total_found . "\t\t=> " . $survey. "\n";