[英]Write a word at the end of a specific line in a text file using erlang
我如何在Erlang文件的指定行末尾写一个词,比如
第1行:“他是约翰”
write_word("poem.txt",1," doe.").
第1行:“他是约翰·多伊。”
这就是我所能做的:
write_word(Filename, LineNumber, Word) ->
{ok, Data} = file:open(FileName, [read, write]),
% write the word at end of line with the specified line number
以下提供的是一种伪代码(未经测试的一种)。 另外,您还必须将内容写入新文件
openFile(FileName, Mode, DesiredLine) -> {ok, FD} = file:open(FileName, Mode), for_each_line(FD, 0, DesiredLine). for_each_line(FD, LineNo, DesiredLine) -> case io:get_line(FD, "") of eof -> file:close(FD); Line -> case LineNo =:= DesiredLine of false -> %% Write into a new file NewLine = Line, for_each_line(FD, LineNo + 1); true -> %% do your stuff NewLine = Line ++ "Word", %% write into your file end end.
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.