From ebb26ed531c75f67ac5364c9ddbf923ef0cce7d1 Mon Sep 17 00:00:00 2001 From: heuzef Date: Wed, 7 Feb 2018 15:35:36 +0100 Subject: [PATCH] Add grand total detected Threat --- defacement_check.pl | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/defacement_check.pl b/defacement_check.pl index dcf6472..df9152e 100644 --- a/defacement_check.pl +++ b/defacement_check.pl @@ -36,6 +36,7 @@ foreach $file (@files) { my @urls; my $url; + my $somme_total_found = 0; open(TXT, '<', $file) or die $!; while(){ my $url = $_; @@ -61,13 +62,15 @@ foreach $file (@files) # Results foreach (uniq(@found)) { $total_found++; - print "\033[33m" . $total_found . "\t\t" . $_ . "\n"; + print "\033[33m[" . $total_found . "]\t\t" . $_ . "\n"; } if ($total_found == 0) { - print "\033[32m" . $total_found . "\t\t=> " . $survey. "\n"; + print "\033[32m[" . $total_found . "]\t\t=> " . $survey. "\n"; } else { - print "\033[31m" . $total_found . "\t\t=> " . $survey. "\n"; + print "\033[31mTREATH [" . $total_found . "]\t=> " . $survey. "\n"; } + my $somme_total_found = $somme_total_found + $total_found; } close(TXT); + print "\033[36mTotal TREATH detected \t\t=> [" . $somme_total_found . "]\n\n"; }