Haskell，mongodb，date

Question

如何从haskell向mongodb插入或自动插入日期？从mongo date类型转换为haskell数据类型的最佳方法是什么？

比方说，在我插入博客帖子记录(任何haskell web框架)的情况下，我想自动为每条记录盖上日期戳。我该怎么做呢？这个问题更多的是关于haskell驱动中的类型转换和mongodb date类型的创建。

Answer 1

您必须创建一个bson文档并将其存储在mongodb中。最优雅的方法是为您自己的类型创建一个转换为bson的实例。

从sources

instance Val UTCTime where
    val = UTC
    cast' (UTC x) = Just x
    cast' _ = Nothing

instance Val POSIXTime where
    val = UTC . posixSecondsToUTCTime . roundTo (1/1000)
    cast' (UTC x) = Just (utcTimeToPOSIXSeconds x)
    cast' _ = Nothing

(或者通过timestamp :：ObjectId -> UTCTime免费获取timestamp)