modified clojure script into haskell version

Author: edwardgeorge

src/scripts/haskell.coffee

@@ -0,0 +1,41 @@
+# Description:
+#   Evaluate one line of Haskell
+#
+# Dependencies:
+#   None
+#
+# Configuration:
+#   None
+#
+# Commands:
+#   hubot haskell <script> - Evaluate one line of Haskell
+#
+# Author:
+#   edwardgeorge, slightly modified from code by jingweno
+
+HASKELLJSON=""
+
+module.exports = (robot) ->
+  robot.respond /(haskell)\s+(.*)/i, (msg)->
+    script = msg.match[2]
+
+    msg.http("http://tryhaskell.org/haskell.json")
+      .query({method: "eval", expr: script})
+      .headers(Cookie: "HASKELLJSON=#{HASKELLJSON}")
+      .get() (err, res, body) ->
+        switch res.statusCode
+          when 200
+            if res.headers["set-cookie"]
+              HASKELLJSON = res.headers["set-cookie"][0].match(/HASKELLJSON=([-a-z0-9]+);/)[1]
+            result = JSON.parse(body)
+
+            if result.error
+              msg.reply result.error
+            else
+              if result.result
+                outputs = result.result.split("\n")
+                for output in outputs
+                  msg.reply output
+              msg.reply result.type
+          else
+            msg.reply "Unable to evaluate script: #{script}. Request returned with the status code: #{res.statusCode}"