在 Erlang 中计数（如何递增变量？）

我已经弄清楚了 Erlang 风格的循环：尾递归，其函数采用所有“不变的变量”：

%% does something, 80 bytes at a time
loop(Line, File) -> loop(Line, File, 0).
loop(Line, File, Count) -> 
    do_something(Line, Count),
    case file:read(File, 80) of
        {ok, Line2} -> loop(Line2, File, Count + 1);
        eof -> file:close(File);
        {error, Reason} -> {error, Reason}
    end.

但是，在 Erlang 中增加计数器的最佳方法是什么？在大多数编程语言中，计数的方式是通过递增变量（即count += 1;）。 Erlang 的变量不会变化，所以我们必须有创造力。幸运的是，我们还有选择……

我们可以在函数中传递一个 Counter 变量，并在每次函数调用时递增它。我们可以使用进程字典来存储计数，并且get and put来增加它。我们可以使用ETS，流程的本地数据存储。我们可以使用计数器进程（！！！）：

loop(Count) ->                            
    receive                                   
        { incr } -> 
            loop(Count + 1);              
        { report, To } ->                     
            To ! { count, Count },            
            loop(Count)                           
    end.                                      

incr(Counter) ->
    Counter ! { incr }.

get_count(Counter) ->    
    Counter ! { report, self() },
    receive
        { count, Count } -> Count
    end.

我确信还有其他方法，具体取决于范围。在 Erlang 中增加变量的“最佳实践”是什么？

不要使用进程字典。

您期望的“正常”循环（即for循环或一个do while）通常在 Erlang 中的递归函数中实现，因此如果您要递增“正常”计数器，请在函数调用中执行此操作，就像您在顶部显示的那样。

不要使用进程字典。

如果您错过了，我可以指出您不应该使用流程字典吗？