하스켈 : 날짜 및 시간으로 초 수를 제대로 인쇄하는 방법은 무엇입니까?

Question

나는 Epoch 이후의 초 수인 정수 값을가집니다. 큰 정수로 출력 할 수 있지만 사람이 읽을 수있는 날짜와 시간으로 표시하려고합니다. 예를 들어

는 : time 이후

2016-01-01 14:11:11 

Answer 1

가능한 사용하는 간단한 time 기반 솔루션을 가진의 이익에

{-# LANGUAGE OverloadedStrings #-} 
import   Prelude 
import qualified Data.ByteString.Char8 as B 
import   Data.UnixTime 
import   Data.Int 
import   Data.Functor 

secToTimestampGMT :: Int32 -> [Char] 
secToTimestampGMT t = B.unpack $ formatUnixTimeGMT "%Y-%m-%d %H-%M-%S" $ UnixTime (fromIntegral t) 0 

secToTimestamp :: Int32 -> IO [Char] 
secToTimestamp t = B.unpack <$> (formatUnixTime "%Y-%m-%d %H-%M-%S" $ UnixTime (fromIntegral t) 0) 

Answer 2

unix-time 모듈 (:

secToTimestamp :: Int32 -> [Char] 

뭔가를 반환 manipulatin을위한 defacto 모듈입니다. g 시간 관련) :

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

secToTimestamp :: Int32 -> String 
secToTimestamp = formatTime defaultTimeLocale "%F %X" . posixSecondsToUTCTime . fromIntegral