-- | Remove leading space (including newlines) from string.
triml :: String -> String
triml = dropWhile (`elem` " \r\n\t")
triml :: String -> String
triml = dropWhile (`elem` " \r\n\t")
triml = dropWhile (`elem` " \r\n\t")