计算来自外部文件的单词出现次数并使用Erlang显示它们？

Question

我无法完全理解如何计算元素在文本文件中出现的次数。 我可以像这样读取文件-

-module(list3).

-export([readlines/1]).

readlines(FileName) ->
{ok, Device} = file:open(FileName, [read]),
try get_all_lines(Device)
  after file:close(Device)
end.

get_all_lines(Device) ->
case io:get_line(Device, "") of
    eof  -> [];
    Line -> Line ++ get_all_lines(Device)
end.

我会将文本文件传输到字符串列表中，并且我了解list：length或foldl通常会计算列表中元素的数量，从而返回总的单词数，但是，我想在列表中列出单词文件以及发生了多少次。 是否可以通过模式匹配来完成？ 我目前能想到的唯一解决方案将需要大量代码。

任何提示将不胜感激。

Answer 1

您可以在此处找到单词计数的示例： http : //www.roberthorvick.com/2009/07/02/word-frequency-redux-erlang-list-comprehension-regex-and-list-folding/