計算來自外部文件的單詞出現次數並使用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/