haskell - 获取 Unix/Epoch 时间为 Int

Question

haskell 中是否有以秒/毫秒为单位的纪元时间函数？

也许类似于java的东西

System.currentTimeMillis();

编辑:作为 Int或 Integer ?

Answer 1

是的。

getCurrentTime :: IO UTCTime .

UNIX 纪元时间可以检索为 Int像那样:

> :m + Data.Time System.Locale Control.Applicative
> epoch_int <- (read <$> formatTime defaultTimeLocale "%s" <$> getCurrentTime) :: IO Int
> epoch_int
1375025861

更新 :正如其他用户所注意到的，有更简单的方法可以做到这一点:

> :m + Data.Time.Clock.POSIX
> round `fmap` getPOSIXTime 
1375040716
it :: Integer