日期到兆秒

时间:2010-09-08 22:11:28

标签: erlang

有没有简单的方法可以将erlang datetime表示法转换为now / 0表示法?

基本上我需要这个函数的反函数:

{Date, Time} = calendar:now_to_datetime(now()).

类似

{Megaseconds, Seconds, Microsecods} = datetime_to_now({Date, Time})

1 个答案:

答案 0 :(得分:2)

我撤回了我的问题。我的google-fu似乎没有热身。以下完全符合我的要求。

-define(GREGORIAN_SECONDS_1970, 62167219200).

datetime_to_now(DateTime) ->
    GSeconds = calendar:datetime_to_gregorian_seconds(DateTime),
    ESeconds = GSeconds - ?GREGORIAN_SECONDS_1970,
    {ESeconds div 1000000, ESeconds rem 1000000, 0}.