linux平台：使用lua语言遍历某一文件夹下所有文件

你可以参考如下实例代码：function getFile(file_name) 

    local f = assert(io.open(file_name, 'r'))

    local string = f:read("*all")

    f:close()

    return string

end function writeFile(file_name,string)

 local f = assert(io.open(file_name, 'w'))

 f:write(string)

 f:close()

end --从命令行获取参数， 如果有参数则遍历指定目录，没有参数遍历当前目录 if arg[1] ~= nil then

     cmd = "ls "..arg[1]

else

     cmd = "ls" end print("cmd", cmd)

--io.popen 返回的是一个FILE，跟c里面的popen一样 local s = io.popen(cmd)

local fileLists = s:read("*all")

print(fileLists)

while true do --从文件列表里一行一行的获取文件名 _,end_pos, line = string.find(fileLists, "([^\n\r]+.txt)", start_pos)

        if not end_pos then break end --    print ("wld", line) local str = getFile(line)

    --把每一行的末尾 1, 替换为 0, local new =string.gsub(str, "1,\n", "0,\n")

    --替换后的字符串写入到文件。以前的内容会清空     writeFile(line, new)

    start_pos = end_pos + 1 end

先以a.txt为例：

awk -v RS="" '{ 

n = split($0,a,"《[^》]+》")

for(i=2i<ni+=2)

    print "《keywords》"a[i]"《/keywords》" 

}' a.txt >>./newfile/a.txt

这样就行了。

为了可读性，我将一条awk语句写成了多行。

实际测试结果如下：

解说：

RS=""

将awk的记录分隔符设置为空（默认是换行符），即将整个a.txt文本看做一条记录。

n = split($0,a,"《[^》]+》")

以正则"《[^》]+》"匹配的内容作为分隔符，对文本内容进行分割并将分割结果存入数组a，分割出的数目（数组大小）即为split函数的返回值n。这里暂且不对该正则做过多解释，否则喧宾夺主，有需要请追问，我再补充。

for(i=2i<ni+=2)

    print "《keywords》"a[i]"《/keywords》"

打印数组下标为偶数的元素并在首尾分别加上关键字标记以还原。数组下标从1开始。

其他文件可作相同处理。如果文件较多，你可以搞个循环去做。这个应该不难。

---