regexp in haskell implementieren...