Lua程序设计（第4版）课后练习 （第4章）

4.3

local function insertString(original, n, insert)

    if type(original) ~= "string" or type(insert) ~= "string" or type(n) ~= "number"  or n < 0 then

        return "type error"

    end

    local s1, s2 = "", ""

    if n > 1 then

        s1 = original:sub(1, n - 1) --string.sub(original,1,n-1)

    end

    s2 = original:sub(n)

    return s1 .. insert .. s2

end

4.5

local function removeString(original, n, length)

        

        if type(original) ~= "string" or type(n) ~= "number" or type(length) ~= "number"  then

                return "type error"

         end

        local s1 = original:sub(n, n + length - 1)

        local s2 =original:gsub(s1,"")

        return s2

end