閑古鳥

オールドプログラマの日記。プログラミングとか病気(透析)の話とか。

2006-02-12から1日間の記事一覧

今日の日付を取得する (2)

関数を使ってみる。あと、日付の整形を formatCalendarTime 関数に置換。 module Main where import Time import Locale today :: IO CalendarTime today = getClockTime >>= toCalendarTime main = do tm だいぶすっきり。

散髪

だいぶ伸びてきて邪魔になっていたので切ってきました。散髪中に最近お金をおろしていない事を思い出し、財布の中身が心配になって冷や冷やしていましたが、 5 千円札があって助かりました。

今日の日付を取得

標準ライブラリの Time モジュールを使用すると日時の操作ができる。 module Main where import Time import Ix main = do c >= toCalendarTime) putStrLn $ show (ctYear c) ++ "-" ++ show ( (index(January, December) (ctMonth c)) + 1) ++ "-" ++ show …