add OUT for get only Grand Total TREATH in stdout (out.txt)

defacement_check.pl

@@ -106,3 +106,8 @@ foreach $file (@files)
 }
 
 print "\033[36mGrand Total TREATH detected on ALL website \t\t=> [" . $grand_total_found . "]\n\n";
+
+# Print results in Output file
+open(my $out, '>', 'out.txt');
+print $out $grand_total_found;
+close $out;

urls/www.firewall-services.com.urls

@@ -1,10 +0,0 @@
-http://www.firewall-services.com/
-http://www.firewall-services.com/clubs-entreprises.html
-http://www.firewall-services.com/contact.html
-http://www.firewall-services.com/espace-presse.html
-http://www.firewall-services.com/formations.html
-http://www.firewall-services.com/index.html
-http://www.firewall-services.com/nos-competences.html
-http://www.firewall-services.com/passeport.html
-http://www.firewall-services.com/plan.html
-http://www.firewall-services.com/prolibre.html