如何实现从列表A中的所有值到进程列表B的同时传递?列表A& B大小相等。假设A = [1,2,3]并且B = [< 0.42.0>,< 0.43.0>,< 0.44.0>]。我想将值1传递给处理< 0.42.0>等等并行执行。
这是我到目前为止所得到的:
pass_values([P|ValueListA], [H|ProcessListB]) ->
H ! {foo, P},
pass_values(ValueListA, ProcessListB).
答案 0 :(得分:1)
您正在寻找的是一个scatter
实用程序,它接受一系列元素并将元素分发到一个进程数组。
-module(lab).
-compile(export_all).
go() ->
ProcessList =
lists:map(fun(_) ->
spawn(?MODULE, echo, [])
end,
lists:seq(1, 6)),
DataList = ["E", "r", "l", "a", "n", "g"],
scatter(DataList, ProcessList).
scatter(DataList, ProcessList) ->
lists:foreach(fun({Data, Process}) ->
Process ! Data
end,
lists:zip(DataList, ProcessList)).
echo() ->
receive
Msg ->
io:format("~p echos ~p~n", [self(), Msg]),
echo()
end.
试一试:
1> c(lab).
{ok,lab}
2> lab:go().
<0.40.0> echos "E"
<0.41.0> echos "r"
<0.42.0> echos "l"
<0.43.0> echos "a"
<0.44.0> echos "n"
<0.45.0> echos "g"
ok