获取当前时间
获取从1970年1月1日零时起,到现在经过的时间,结果为{MegaSecs, Secs, MicroSecs}。
erlang:now()
同样获取当前时间,但更接近于操作系统时间。
os:timestamp()
注意
erlang:now()在实现上对时间多做了一个校正,相对os:timestamp()有点失真,同时也会有多余的开销。但是erlang:now()每次都生成唯一的值,有时候也是一大利好。
默认初始时间
Date = calendar:universal_time_to_local_time({{1970, 1, 1}, {0, 0, 0}}),
calendar:datetime_to_gregorian_seconds(Date).
=> 62167248000
获取当前时间戳
- 秒
now() ->
{M, S, _} = os:timestamp(),
M * 1000000 + S.
- 毫秒
now_ms() ->
{A, B, C} = os:timestamp(),
A * 1000000000 + B * 1000 + C div 1000.
- 微秒
now_us() ->
{A, B, C} = os:timestamp(),
A * 1000000000000 + B * 1000000 + C.
- 时间差
time_diff({A1,A2,A3} = erlang:now(), {B1,B2,B3}) ->
(B1 - A1) * 1000000 + (B2 - A2) + (B3 - A3) / 1000000.0 .
获取当前时间
- 本地时间
local_time() ->
calendar:local_time().
- 世界时间
world_time() ->
calendar:universal_time().
获取年月日,时分秒
{{Year, Month, Day}, {Hour, Minite, Second}} = calendar:local_time().
erlang:local_time().
获取星期
Date = erlang:local_time(),
calendar:day_of_the_week(Date).
时间转换
- 秒转时间
calendar:seconds_to_daystime(86000).
{0,{23,53,20}}
calendar:seconds_to_daystime(86400).
{1,{0,0,0}}
calendar:seconds_to_daystime(1086400).
{12,{13,46,40}}
- 时间转秒
calendar:time_to_seconds({23,53,20}).
86000
- 日期转天
calendar:date_to_gregorian_days({2018,8,8}).
737279
时间与时间戳的转换
- 时间转时间戳,格式:{{2013,11,13}, {18,0,0}}
datetime_to_timestamp(DateTime) ->
calendar:datetime_to_gregorian_seconds(DateTime) - calendar:datetime_to_gregorian_seconds({{1970,1,1}, {0,0,0}}).
- 时间戳转时间
timestamp_to_datetime(Timestamp) ->
calendar:gregorian_seconds_to_datetime(Timestamp + calendar:datetime_to_gregorian_seconds({{1970,1,1}, {0,0,0}})).
时间戳作为随机种子
random:seed(erlang:now()).
random:uniform().
时间格式化
-module(print_time).
-export([format_utc_timestamp/0]).
format_utc_timestamp() ->
TS = {_,_,Micro} = os:timestamp(),
{{Year,Month,Day},{Hour,Minute,Second}} =
calendar:now_to_universal_time(TS),
Mstr = element(Month,{"Jan","Feb","Mar","Apr","May","Jun","Jul",
"Aug","Sep","Oct","Nov","Dec"}),
io_lib:format("~2w ~s ~4w ~2w:~2..0w:~2..0w.~6..0w",
[Day,Mstr,Year,Hour,Minute,Second,Micro]).
运行如下:
1> io:format("~s~n",[print_time:format_utc_timestamp()]).
29 Apr 2009 9:55:30.051711
计时器
注意
erlang的计时器timer是通过一个唯一的timer进程实现的,该进程是一个gen_server,每个用户的计时器都是一条记录,保存在timer的ets表timer_tab中,timer的时序驱动通过gen_server的超时机制实现。若同时使用timer的用户过多,则timer将响应不过来,会成为瓶颈。
send_after(Time, Pid, Message) -> {ok, TRef} | {error, Reason} %发消息
timer:apply_after(Time, Module, Function, Arguments) -> {ok, TRef} | {error, Reason} %函数形式
erlang的原生计时器erlang:send_after和erlang:start_timer,把计时器附着在进程自己身上。
erlang:send_after(Time, PID, Msg) -> Ref.
=> handle_info(Msg).
erlang:start_timer(Time, PID, Msg) -> Ref.
=> handle_info({timeout, Ref, Msg}).
erlang:cancel_timer(TimeRef) -> Time|false.