我正在将文本文件读入列表,内容为:
blah
blah
blah
现在我正在尝试将列表数据写入文件,因此它看起来与上面相同,我使用的是:
filewrite(File,L) ->
{ok, S} = file:open(File, write),
lists:foreach( fun(X) -> io:format(S, "~n",[X]) end, L),
file:close(S).
但这会在1行打印所有内容,括号和语音标记......
答案 0 :(得分:0)
试试这个:
filewrite(File, []) ->
ok;
filewrite(File, List) ->
file:write_file(File, lists:foldl(fun(E, A) ->
A ++ "\n" ++ E
end, hd(List), tl(List))).