Обработка поста с использованием Warp / Wai

Как вы извлекаете данные из почтового запроса с использованием Network.wai и Warp ?

Скажите, например, у меня есть простая веб-страница

....
<form method="POST" action="/handlepost">
    <input name="name" type="text" />
    <input type="submit" />
</form>
....

, когда пользователь нажимает, как я могу получить эти данные? Я знаю, как получить данные ( QueryString )

Например

app :: Application
app request = case rawPathInfo request of
                   "/" -> return $ displayForm
                   "/handlePost" -> return $ handlepost
                   _ -> return $ notFound

displayForm :: Response
displayForm = ResponseBuilder
    status200
    [("Content-Type", "text/html")] $
    fromByteString "<form method='POST' action='/handlepost'><input name="name" type="text" /><input type='submit'></form>"

handlePost :: Request -> Response
handlePost req = undefined -- how do I examine the contents of POST?