lua 文件读写处理（操做敏感词库）

local function getNewWord() local wordsDataInput  = {} local wordsDataOutput = {} -- 读取文件
    -- 以只读方式打开文件
    local file_input = io.open("sensitive_words_input.txt", "r") -- 设置默认输入文件为 test.lua
    io.input(file_input) -- 逐行读取文件
    local string_l = file_input:read("*l") while(string_l ~= nil) do
        table.insert(wordsDataInput, string_l) string_l = file_input:read("*l") end
    io.close(file_input) -- 写入文件
    -- 以只写方式打开文件
    local file_output = io.open("sensitive_words.txt", "a") -- 设置默认输出文件为
    io.output(file_output) -- 对数据进行处理
    -- 若是有头包含
    local function ifIsHeadInTable(str) for i = 1, #wordsDataInput do
            local startIndex, endIndex = string.find(wordsDataInput[i], str) if startIndex ~= nil and endIndex ~= nil then
                -- 若是find到头索引为1,尾索引不为字符串长度则能够认定为是头包含关系
                if startIndex == 1 and endIndex ~= string.len(wordsDataInput[i]) then wordsDataInput[i] = "\n"
                end
            end
        end    
    end 
    
    -- 是否已经有相同的
    local function isHasSameInTable(str) if not wordsDataOutput or not next(wordsDataOutput) then return false end

        for key, value in ipairs(wordsDataOutput) do
            if value == str then
                return true
            end
        end

        return false
    end

    -- 先剔除头包含
    for key, value in pairs(wordsDataInput) do ifIsHeadInTable(value) end

    -- 再剔除相同的
    for key, value in ipairs(wordsDataInput) do
        if not isHasSameInTable(value) then
            table.insert(wordsDataOutput, value) end
    end

    for index, word in pairs(wordsDataOutput) do
        io.write(word.."\n") end
    io.close(file_output) end