Как на erlang прочитать file.txt в массив, а потом записать массив в файл?

Как на erlang прочитать file.txt в массив, а потом записать массив в файл?
Каждый элемент массива должен быть равен строке файла.
Строки файла разделены \r\n
  • Вопрос задан
  • 3263 просмотра
Решения вопроса 1
Rsa97
@Rsa97
Для правильного вопроса надо знать половину ответа
Прочитать примерно так:
read_file_by_lines(Name, Mode, Array) ->
    {ok, Device} = file:open(Name, Mode),
    read_each_line(Device, []).

read_each_line(Device, Accum) ->
    case io:get_line(Device, "") of
        eof  -> file:close(Device), array:from_list(lists:reverse(Accum));
        Line -> read_each_line(Device, [Line | Accum])
    end.

Записать можно так:
write_file_by_lines(Name, Mode, Array) ->
    {ok, Device} = file:open(Name, Mode),
    lists:foreach(
        fun(Line) -> io:write(Device, Line)
        end, 
        array:to_list(Array)),
     file:close(Device).
Ответ написан
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы