diff --git a/conf/keywords.cfg b/conf/keywords.cfg index 667a080..472a015 100644 --- a/conf/keywords.cfg +++ b/conf/keywords.cfg @@ -1,4 +1,4 @@ -(?:[a-z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-z0-9!#$%&'*+/=?^_`{|}~-]+)*|"(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21\x23-\x5b\x5d-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])*")@(?:(?:[a-z0-9](?:[a-z0-9-]*[a-z0-9])?\.)+[a-z0-9](?:[a-z0-9-]*[a-z0-9])?|\[(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?|[a-z0-9-]*[a-z0-9]:(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21-\x5a\x53-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])+)\]) +#EMAIL REGEX (?:[a-z0-9!#$%&'*+/=?^_`{|}~-]+(?:\.[a-z0-9!#$%&'*+/=?^_`{|}~-]+)*|"(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21\x23-\x5b\x5d-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])*")@(?:(?:[a-z0-9](?:[a-z0-9-]*[a-z0-9])?\.)+[a-z0-9](?:[a-z0-9-]*[a-z0-9])?|\[(?:(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?|[a-z0-9-]*[a-z0-9]:(?:[\x01-\x08\x0b\x0c\x0e-\x1f\x21-\x5a\x53-\x7f]|\\[\x01-\x09\x0b\x0c\x0e-\x7f])+)\]) 0wn3d 0wned anonymous diff --git a/conf/websites.cfg b/conf/websites.cfg new file mode 100644 index 0000000..86b0ee6 --- /dev/null +++ b/conf/websites.cfg @@ -0,0 +1 @@ +www.firewall-services.com diff --git a/defacement_check.pl b/defacement_check.pl index 2087ec6..79065f7 100644 --- a/defacement_check.pl +++ b/defacement_check.pl @@ -17,7 +17,17 @@ print "\033[36m \nDEFACEMENT CHECK [" . $date . "]\n\nSearching for suspects ... print "FOUND \t\t=> URLs\n"; # Import config +my @scan; my @search; +my $websites = 'conf/websites.cfg'; +if (open(my $f, '<:encoding(UTF-8)', $websites)) { + while (my $row = <$f>) { + chomp $row; + push @scan, $row; + } +} else { + warn "Could not open file '$keywords' $!"; +} my $keywords = 'conf/keywords.cfg'; if (open(my $f, '<:encoding(UTF-8)', $keywords)) { while (my $row = <$f>) {