Getting the current date
Jump to navigation
Jump to search
to get the date just use
date :: IO (Integer,Int,Int) -- :: (year,month,day)
date = getCurrentTime >>= return . toGregorian . utctDay