[Haskell] problems with RegEx