RosettaCodeData/Task/File-modification-time/Haskell/file-modification-time-2.hs

import System.Directory
import System.Time

do ct <- getModificationTime filename
   cal <- toCalendarTime ct
   putStrLn (calendarTimeToString cal)