Ignore list is OK !

conf/websites.cfg

@@ -1 +0,0 @@
-www.firewall-services.com

defacement_check.pl

@@ -97,15 +97,15 @@ foreach $file (@files)
 
     foreach my $s (@search) {
       foreach (grep(/$s/i, split(/\n/, $site))) {
-        # foreach my $i (@whitelist) {
-        #
-        # }
-        my $i = "prolibre";
-        if($_ =~ m/$i/i) {
+        push @found, $_;
+      }
+    }
+
+    foreach my $i (@whitelist) {
+      foreach (uniq(@found)) {
+        foreach (grep(/$i/i, split(/\n/))) {
           print "\033[35mIGNORE ";
-        }
-        else {
-          push @found, $_;
+          pop @found, $_;
         }
       }
     }