An ls replacement written in Haskell