push(@file_list, $File::Find::name)
       if /\.(?:txt|jpg|gif)\z/i
       && !/category\.txt\z/i;