Erlang 日期到兆秒

有什么简单的方法可以将erlang日期时间表示法转换为now/0表示法吗

基本上我需要这个函数的倒数：

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

大概是

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

---

我收回我的问题。我的谷歌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}.

Erlang的now（）计算从1970年1月1日开始的兆秒/秒/微秒数。但是，datetime_to_gregorian_seconds计算从日历开始算起的秒数。魔术数字是直到1970年的秒数。我猜它可能已经被写了定义（GREGORIAN_SECONDS_1970，calendar:datetime_to GREGORIAN_SECONDS（{{{1970,1,1}，{0,0,0}）。