if ($file =~ m/\.log$/i  || 
        $file =~ m/\.\d+\w+\-\d+\wm$/i)