從外部文件中計數詞的出現並使用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. 

我將文本文件轉移到一個字符串列表，我的理解是列表：長度或與foldl通常會整體返回一個列表中算元素個數但是，我想列出文件中的文字以及文件發生的次數。這是通過模式匹配來完成的嗎？我目前唯一能想到的解決方案將需要大量的代碼。

任何提示，將不勝感激。

Answer 1

你可以找到例子字計數這裏：http://www.roberthorvick.com/2009/07/02/word-frequency-redux-erlang-list-comprehension-regex-and-list-folding/