a little haskell web service