[string] How to split a string in Haskell?