DouKaku?beta

challenge ミリ秒まで含んだ時刻文字列

YYYY年mm月dd日HH時MM分SS.xxx秒なら、「YYYYmmddHHMMSS.xxx」のようにミリ秒まで含んだ文字列を返すプログラムを書いてください。

post comment

Posted feedbacks - Haskell

ミリ秒未満は切り捨て
実行例

*Main> :main
20080615084301.575

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
module Main where

import Data.Time
import System.Locale

($$) = flip ($)
main = getCurrentTimeZone >>= \ tz ->
       getCurrentTime     >>= \ ct ->
       utcToLocalTime tz ct $$ formatTime defaultTimeLocale "%Y%m%d%H%M%S.%q"
                            $$ take 18
                            $$ putStrLn

Index

Feed

Other

Link

Pathtraq

loading...
Creative Commons License このサイトの内容は、 クリエイティブ・コモンズ・ライセンスの下でライセンスされています。 [詳細]