From a7e9d7038a0e33cd9bbf57ff140d5c2253b4870f Mon Sep 17 00:00:00 2001
From: Malin <malin@cenusa.me>
Date: Wed, 29 Mar 2017 08:14:44 +0200
Subject: [PATCH] Update 'malware4.pl'

---
 malware4.pl | 29 ++++-------------------------
 1 file changed, 4 insertions(+), 25 deletions(-)

diff --git a/malware4.pl b/malware4.pl
index 2db4a52..5d9cb77 100644
--- a/malware4.pl
+++ b/malware4.pl
@@ -126,31 +126,10 @@ sub dir {
 foreach my $file (sort @files) {
         next if $file eq 'error_log';
         next if $file eq 'tcpdf.php';
-        next if $file eq '*.xls';
-        next if $file eq '*.doc';
-        next if $file eq '*.pdf';
-        next if $file eq '*.sql';
-        next if $file eq '*.docx';
-        next if $file eq '*.eml';
-        next if $file eq '*.csv';
-        next if $file eq '*.zip';
-        next if $file eq '*.tar.gz';
-        next if $file eq '*.jpa';
-        next if $file eq '*.rar';
-        next if $file eq '*.tar';
-        next if $file eq '*.gz';
-        next if $file eq '*.mov';
-        next if $file eq '*.avi';
-        next if $file eq '*.mp3';
-        next if $file eq '*.mp4';
-        next if $file eq '*.webm';
-        next if $file eq '*.flv';
-        next if $file eq '*.fla';
-        next if $file eq '*.swf';
-        next if $file eq '*.ini';
-        next if $file eq '*.txt';
-        next if $file eq '*.po';
-        next if $file eq '*.mo';
+        next if $file eq 'charmap.php';
+        next if $file eq 'main-modules.php';
+        next if $file eq 'wp-super-cache.php';
+        next if $file eq 'user-edit.php';
         print "Scanning $start_dir/$file... ";
 
         unless (-r "$start_dir/$file") {