??
1. 保护式(guard)中如果出错,不会报错,只会返回false!
case 1=:1 of true when not erlang:length(t) =:= 1 orelse true -> ok; _ -> error end.
Result is: error
保护式中对t (atom) 求length会出错,本应crash掉,但因为在保护式中,默认出错后结束此保护式计算并返回false,这也是为什么保护式不接受复杂的函数,只能用erlang的bif来做的原因之一。
2. try catch 时如果不写catch类型,默认为throw类型!
try_catch(Value) -> try case Value of error -> erlang:error({error,plz_catch_me}); throw -> erlang:throw({throw,oh_get_you}); exit -> erlang:exit({exit,sorry_by_mistake}) end catch T -> T end.
Result :
所以最好是:明确: Catch throw:T –> {throw,T}; error:T –> {error,T}; exit:T –> {exit,T} end.
3. 在保护式中使用erlang:length/1要小心再小心!(要遍历列表,时间长度不定)
%%写成这样的耗时与列表长度成平方比:Do not do this foo(List) when lenght(List) >0 -> do_something; foo(_) -> done. %%使用匹配模式来做可做到任意长度断定 better([One]) -> do_something_one(); better([One,Two]) -> do_something_two(); better([one,Two|_]) -> do_something_big(); better([]) -> do_something_empty() end.
Tip: 如果要判定List是一个非空List 可用 case List of [_|_] –> do_something(); _ –> done end.
4. ++只是lists:append/2的一个别名:如果要用一定要确定 ShortList++LongList !(可记为长短的反义短长…每次用他我都会条件反射想一下)
%% DO NOT DO naive_reverse([H|T]) -> naive_reverse(T)++[H]; naive_reverse([]) -> [].
which is the most inefficient way there is to reverse a list. Since the ++ operator copies its left operand, the result will be copied again and again and again... leading to quadratic complexity.
这是最没效率去反转一个list,”++“会复制左边的元素,这个会使复制多次,导致平方倍的复杂度。
但是另一方面:下面这种用法就好了:
%% OK naive_but_ok_reverse([H|T], Acc) -> naive_but_ok_reverse(T, [H]++Acc); naive_but_ok_reverse([], Acc) -> Acc.
这并不是一个是非常坏的尝试,每个列表元素只被copy一次,那增长的Acc是在++的右边的,他不会每次都被copy的
当然,最佳实践还是下面这种:
%% Best Do vanilla_reverse([H|T], Acc) -> vanilla_reverse(T, [H|Acc]); vanilla_reverse([], Acc) -> Acc.
这比上面的还要高效一点点,你根本不用去建造一个list元素,直接copy他就可以了(或者:如果编译器不把[H]++Acc重写为[H|Acc] ,那就更高效啦)。
5. receive 和case的区别很大,虽然写法类似:
case_test(Value) -> case Value of 1 -> ok; 2 -> error end. receive_test(Value)when Value>2 -> PID = spawn(fun () -> receive {msg,1} -> ok; {msg,2} -> error end end), [begin PID ! {msg,ValueT} end ||ValueT<-lists:seq(3,Value)], PID.
Result:
从上面可以看出:
5.1 case如果没有匹配就会出错;
5.1 recieve 会在没有匹配消息时阻塞,只要信箱中没有匹配消息,就会在等待期间挂起,=有新消息到时才会被唤醒,每次执行时,receive会先检查最老的消息(位于队列头部),像在case表达式中那样尝试匹配,如果找不到,就会继续下一消息,如果与当前匹配成功,且保护式成立(如果有),此消息就会被移出信箱,同时子句对应的正文会被执行,如果一直没找到合适消息就会一直等待至超时(如果有的话,after Times).
6. erl 用-noshell –noinput 启动一个node时,看不到,又不能输入怎么调试?用-remsh参数
>erl -name [email protected] -setcookie 123456 -noshell -noinput >erl -name [email protected] -setcookie 123456 -remsh [email protected] %%注意起的节点叫foo哦,不是bob了! [email protected]> nodes(). [email protected]127.0.0.1>[‘[email protected]‘] [email protected]127.0.0.1>node(). [email protected]127.0.0.1>‘[email protected]‘
这里的坑在于:
6.1 在remote出来的节点上调用q(),2个节点都会退出!好可怕,所有最好把q()这个函数在user_default.erl里面重写,让他不要执行init: stop().
6.2 window下要用werl 代替erl;
6.3 erl支持自定义参数,比如你写erl –rmsh test 也是不会报错的,如果不小心写错了,就会查好久……..
Tip: 已 起A,B二个节点,要用A 控制B,可以在A中使用Ctrl+G r NodeA j 2操作 具体见:Learn some erlang remote shell.
7.如果有一个ArgList 是:从不可知道的地方传过来是这样子:”[test1,test2,test3]”,要怎么使用才能动态执行?
场景:知道方法调用的方法:Method 使用 erlang:apply(Module,Method,ArgList)调用产生结果,这时的ArgList是不符合格式:
%% String = "[test1,test2,4]."注意最后面的结束小句号! string_to_args(String) -> {ok, Scan1, _} = erl_scan:string(String), {ok,P}=erl_parse:parse_exprs(Scan1), {value,Value,[]} = erl_eval:exprs(P, []), Value.
以上合适List中所有的参数都是绑定的:,如果是有Test1这样的变量,我也没试过,还没遇到这种需求
8. erl 启动参数可以自己定义:如
>erl -test erlang1 -test hello -test1 test1 >init:get_argument(test). {ok,[["erlang1"],["hello"]] >init:get_arguments(). [{root,["C:\\Program Files\\erl6.0"]}, {progname,["erl"]}, {home,["C:\\Users\\**"]}, {test,["erlang1"]}, {test,["hello"]}]
8.1 不要把参数定义为string了:比如 “hello world”
8.2 如果这个是启动application启动用的,就不要指望用这个自定义的参数了,用config定义吧
9.使用RPC时一定要记得你是在distributed的,时刻关注你在那个进程!
比如:把rpc:call放在loop里面和外面会得到不一样的效率反馈,以下这例子的结果是等价的,但是第一种会发出很多的call,第二种只有一个call.
%%Example - Bad [rpc:call(node, ets, lookup, [table, K]) || K <- ListOfKeys]. %%Example - Good rpc:call(node, ?MODULE, get_data, [ListOfKeys, []]). get_data([], Out) -> lists:reverse(Out); get_data([K|ListOfKeys], Out) -> get_data(ListOfKeys, [ets:lookup(table,K)|Out]).
同理你可以自己改一下:[gen_server:call(Pid,{func,Fun})||Fun<- FunList].
总之要能一次发消息处理的就不要多次发啦.
10 不要构造超极大的terms(或者你不可控制大小的terms).
具体就是如果要遍历ets里面所有的元素,用ets:tab2list/1得出来的结果可能什么非常大,这可怎么办啊!
%% 一次性也出所有元素:不要这样子做 bad_traverse_to_print() -> [begin print(Person) end||Person <- ets:tab2list(person)], ok. %%从第一个一直遍历到最后一个:数据要从erts内部搬到process 当ets很大的时候就效率低 good_traverse_to_print() -> good_traverse_to_print2(ets:first(person)). good_traverse_to_print2(‘$end_of_table‘) -> ok; good_traverse_to_print2(Key) -> [Person] = ets:lookup(person,Key), print(Person), good_traverse_to_print2(ets:next(person,Key)). %%分页:最佳实践使用ets:select match MatchSpec:ets内部实现了把matchspec编译成opcode 然后eval的时候把需要的数据才拷贝到process去 大大减少了数据量 best_traverse_to_print() -> case ets:match(person,‘$1‘,10) of {PersonList,‘$end_of_table‘} -> [begin print(Person) end|| [Person] <- PersonList]; {PersonList,Key} -> [begin print(Person) end|| [Person] <- PersonList], best_traverse_to_print2(Key) end, ok. best_traverse_to_print2(Key) -> case ets:match(Key) of {PersonList,‘$end_of_table‘} -> [begin print(Person) end|| [Person] <- PersonList]; {PersonList,Key2} -> [begin print(Person) end|| [Person] <- PersonList], best_traverse_to_print2(Key2) end. print(Person) -> io:format("Name~p Phone:~p~n",[Person#person.name, Person#person.phone]), ok.