得到时间作为国际

Question

haskell中是否有一个函数用于纪元时间,以秒/毫秒为单位？

也许类似于java的东西

System.currentTimeMillis();

编辑:as Int或Integer？

Answer 1

是.

getCurrentTime :: IO UTCTime.

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

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

UPD:正如其他用户注意到的那样,有更简单的方法:

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

Answer 2

试试这个:

import Data.Time
import Data.Time.Clock.POSIX

t = getPOSIXTime

它有6位小数的精度.