来自:https://my.oschina.net/ffs/blog/465402
一、Erlang语法:变量、模式匹配
--------------------------------------
1.elr命令:工具栏toolbar:start().
2.%。。。注释
3.变量首字母大写,单一赋值
4.模式匹配
5.原子:hello, 'an atom with'
6.元组tuple:元组嵌套{person,{a,1},{b,2}}
提取元组字段值Point = {point, 10, 45} {point, X, Y} = Point
7.列表list: 定义列表ThingsToBuy1 = [{oranges,4}, {newspaper,1}|{ThingsToBuy}]
提取元素[Buy1|ThingsToBuy2] = ThingsToBuy1.
8.字符串:"hello"
9.q()退出
10.f()释放变量
二、Erlang语法:函数(面向函数编程:函数可以作为参数,也可以作为返回值,可以使用列表解析、断言、case/if、二进制、比特位、进制、ASCII码)
--------------------------------------
1.函数
编译:c(geometry)
运行:geometry:area({rectangle, 10, 5}).
2.匿名函数:Double = fun(X) -> 2*X end.
Double(2).
Hypot = fun(X, Y) -> math:sqrt(X*X+Y*Y) end.
TempConvert = fun({c,C}) -> {f, 32+C*9/5};
({f,F}) -> {c, (F-32)*5/9}
end.
3.fun作为函数参数
映射:lists:map(Double, [1,2,3,4]).
返回[2,4,6,8].
过滤:lists:filter(Even, [1,2,3,4]).
Even = fun(X) -> (X rem 2) =:= 0 end.
4.返回fun的函数
Fruit = [apple,pear,orange].
MakeTest = fun(L) -> (fun(X) -> lists:member(X,L) end) end.
IsFruit = MakeTest(Fruit).
即:IsFruit = fun(X) -> lists:member(X,[apple,pear,orange]) end.
5.循环
for(Max,Max,F) -> [F(Max)];
for(I,Max,F) -> [F(I)|for(I+1,Max,F)]
6.列表解析
[2*X || X <- L].
定义:Buy = [{oranges,4},{newspaper,1},{apples,10},{pears,6},{milk,3}].
乘积:[shop:cost(A)*B || {A,B} <- Buy]
求和:libs:sum([shop:cost(A)*B || {A,B} <- Buy]).
(1)快速排序:L=[12,6,2,13,2,8,9,10]. qsort(L).
(2)毕达哥拉斯三元组:libs:pythag(16).
(3)变位词:libs:perms("123").
["123","132","213","231","312","321"]
7.算术表达式
8.断言:
max(X,Y) when X > Y -> X;
max(X,Y) -> Y.
断言函数:
f(X,Y) when is_integer(X), X > Y, Y < 6 -> X;
9.记录:record
10.case表达式:
filter(P, [P|T]) ->
case P(H) of
true -> [H|filter(P,T}];
false ->filter(P,T)
end;
filter(P, []) -> [].
11.if表达式:
12.内建函数BIF
元组转换为列表:tuple_to_list({12,cat,"Hello"}).
系统时间:time()
13.二进制数据:<<5,10,20>>,<<"hello">>
操纵:list_to_binary()
term_to_binary()
binary_to_term()
size()
14.比特语法:<>
file:read_file("")
15.动态调用:apply(libs, sum, [1,2,3,4]).
16.模块定义:-module(modname).
引入:-import(modname, [fun/1]). 可以不写模块名直接引用函数名
导出:-export([name1/1, name2/2]).
编译属性:-compile(options).
模块版本:-vsn(Version).
用户定义属性:-SomeTag(Value).
输出属性:attr:module_info().
attr:module_info(attributes).
引用函数:fun Mod:RemoteFunc/Arity
包含文件:-include(Filename).
-include_lib(Name).
列表操作符:[1,2,3]++[4,5,6]
[1,2,3]--[2,3]
进制:K#123
$语法:$C 表示ASCII
字典:erase(), put(x, 20),get(x), erase(x)
短路表达式:Epr1 orelse Epr2. Epr1 andalse Epr2.
三、Erlang语法:编译运行
--------------------------------------
1.退出:halt().导致数据库要恢复 q().安全退出,等价于init:stop().
2.取得加载路径:code:get_path().
取得主目录:init:get_argument(home).
3.外部运行:D:/erl>erl.exe -noshell -s hello start -s init stop
4.帮助:help().
四、Erlang语法:并发(进程类似于人:通过消息进行沟通,也可以广播;没有共享内存,因此不需要锁;某一个死掉,会通知链接进程)
--------------------------------------
1.创建进程:Pid = spawn(Fun)
spawn(Mod, FuncName, Args).
2.发送消息:Pid!Message
群发消息:Pid1!Pid2!Pid3...!Pidn!Message
接收消息:receive ... end.
例如:Pid = spawn(fun area_server0:loop/0).
Pid!{rectangle, 6, 10}.
3.自身ID:self().
Pid!{self(), Message}.
例如:Pid = spawn(fun area_server1:loop/0).
area_server1:rpc(Pid, {rectangle, 6, 10}).
4.设置进程数:D:/erl>erl +P 500000
测试启动时间:process:max(400000).
5.注册进程:register(AnAtom, Pid). 注册进程别名
unregister(AnAtom). 溢出注册进程
whereis(AnAtom) -> Pid | undefined 判断是否注册
registered() -> [AnAtom::atom()] 取得所有注册进程
例如注册时钟:clock:start(5000, fun() -> io:format("TICK ~p~n", [erlang:now()]) end).
停止时钟:clock:stop().
6.并发错误:链接进程
五、Erlang语法:分布式
--------------------------------------
1.单节点测试
启动服务器:kvs.start().
存储: kvs:store({location, joe}, "Stockholm").
kvs:store(weather, raining).
查找: kvs:lookup(weather).
kvs:lookup({location, joe}).
2.双节点测试
启动服务器节点:
D:/erl>erl -sname gandalf
Eshell V5.7 (abort with ^G)
(gandalf@zhongbingliu)1> kvs:start().
true
(gandalf@zhongbingliu)2>
调用者节点:
D:/erl>erl -sname bilbo
Eshell V5.7 (abort with ^G)
(bilbo@zhongbingliu)1> rpc:call(gandalf@zhongbingliu, kvs, store, [weather, fine]).
true
(bilbo@zhongbingliu)2> rpc:call(gandalf@zhongbingliu, kvs, lookup, [weather]).
{ok,fine}
3.客户机和服务器位于同一局域网的不同机器上
4.客户机和服务器位于因特网的不同机器上:确保4396端口通信正常,epmd会使用这个端口
六、Erlang语法:文件
--------------------------------------
1.读取文件:file:consult("data1.data").
2.读取一项:{ok, S} = file:open("data1.data", read). //打开
io:read(S, ''). //读取一项
io:get_line(S, ''). //读取一行
file:close(S). //关闭
3.查找代码库位置:code:which(file).
d:/erl5.7/lib/kernel-2.13/ebin/file.beam
4.读取二进制数据:
file:read_file("data1.data"). //全部读到内存
{ok, S} = file:open("data1.data", [read,binary,raw]). //打开
file:pread(S, 22, 46). //随机读取
5.查找文件:lib_find:files
6.写入文件:{ok, S} = file:open("data2.data", write). //打开
io:format(S, "~s~n", ["Hello readers"]). //写入
file:close(S). //关闭
7.随机写入:
{ok, S} = file:open("data3.data", [raw,write,binary]). //打开
file:pwrite(S, 10, <<"new">>). //随机写入
8.目录操作:file:list_dir("/"). //文件列表
file:make_dir("abc"). //创建目录
file:del_dir("abc"). //删除目录
9.文件属性:file:read_file_info("data1.data").
10.文件操作:file:copy("data1,data", "/"). //拷贝
file:delete("data1"). //删除
七、Erlang语法:套接字
--------------------------------------
1.Socket连接www:socket:nano_get_url().
2.启动服务器:server:start_nano_server().
3.编写客户端:client:nano_client_eval("list_to_tuple([2+3*4,10+20])").
主动型:非阻塞 服务器接收消息的速度必须快于客户端发送的速度,否则服务器会因为消息缓冲区塞满被消息淹没
被动型:阻塞
混合型:半阻塞
八、Erlang语法:数据库
--------------------------------------
1.ETS是内存存储,速度快
2.DETS是磁盘存储,可备份
3.创建表:ets:new
dets:open_file
4.插入:insert(table, X)
5.查找:lookup(table, Key)
6.释放:dets:close(tableid) etd:delete(tableid)
7.Mnesia数据库:
创建表:-record...
选取所有数据:do(qlc())...
选取部分列:
按条件选取:
关连查询:
增加数据:mnesia:write()
删除数据:mnesia:delete()
事务管理:mnesia:transaction(F)
取消事务:mnesia:abort()
启动表查看器:tv:start().
九、Erlang语法:OTP
--------------------------------------
1.支持事务:使用异常捕捉进行回滚
2.支持热代码替换
3.错误日志
4.警报管理
5.应用程序监视器:appmon:start().
十、Erlang语法:JInterface
--------------------------------------
OptNode 节点,监听端口 能够启动多个服务节点,如[email protected]
Epmd
OptMbox 默认启动一个邮箱 收发邮件
Link 监控远程是否断掉