A haskell pastebin using happstack & HSP!