lua脚本读入文本文件以及删除第一行文本

Question

想弄个自动输入代码的功能，比如在/mnt/sdcard/1.txt 有以下文本,我想每次运行时读入第一行文本，即第一次读入123456，脚本停止后，第二次运行读取234567，我不会用判断那些，程序也不能循环运行，想到的方式是读取完后删除123456，那这样第二次运行，234567就变成第一行了，麻烦大神帮忙看下，对了，读取后加个输入文本命令吧，我对lua一点没了解，所以麻烦了
123456
234567

Answer 1

f=io.open ("youfile.txt","r") --打开你的输入文件 名称为youfile.txt
f:read("*l") --读取一行，但是不保存
s=f:read("*a") --读取剩下的所有，保存到变量
f:close() --关闭文件
f=io.open(youfile.txt","w") --打开输出文件youfile.txt
f:write(s) --将上面保存的剩下所有的内容写入到输出文件
f:close() --关闭

--这样会损坏你的输入文件，请自行备份
--这种方法不建议打开太大的文件（>10M) 速度会很慢。

Answer 2

我直接给你个读出每一行的方法吧
local path = "d:\\1.txt"
local file = io.open(path,"r")
if file then
for line in file:lines() do
print(line) -- 这里就是读出每一行txt里的文字并且print到标准输出上 如果需要修改 只要改掉print就好
end
end追问

谢谢谢你了，那这样能实现自动读行了，比如有2行，他能依次读取并输入吗？还有我是想软件第二次运行再读取第二行，不是说一次性把文本全部依次读取完和输入

追答local filePath = "D:\\1.txt"
function readFile(file)
assert(file,"file open failed")
local fileTab = {}
local line = file:read()
while line do
print("get line",line)
table.insert(fileTab,line)
line = file:read()
end
return fileTab
end

function writeFile(file,fileTab)
assert(file,"file open failed")
for i,line in ipairs(fileTab) do
print("write ",line)
file:write(line)
file:write("\n")
end
end

function main()
    print("start")
local fileRead = io.open(filePath)
if fileRead then
local tab = readFile(fileRead)
fileRead:close()
table.remove(tab,1)
local fileWrite = io.open(filePath,"w")
if fileWrite then
writeFile(fileWrite,tab)
fileWrite:close()
end
end
end

main()

追问

谢谢了

本回答被提问者采纳