[Haskell-cafe] How to break strings and put to a tuple