Elm 获取原始 JSON 字符串

Question

我正在尝试构建一个非常简单的应用程序，它仅从 api 输出原始 JSON 对象。

所以我想要一个接受 url 参数并最好返回 JSON 字符串的函数。

我有以下代码:

decode: String -> String
decode jsonString =
  Decode.decodeString jsonString

apiResonse : String -> String
apiResonse url =
  let
    url = "https://api.giphy.com/v1/gifs/random?api_key=dc6zaTOxFJmzC&tag=cats"
    request = Http.get Decode.decodeString url
  in
    Http.send NewRequest request

但是我很难理解该函数的解码器部分。如果有人能帮助我那就太好了。

Answer 1

如果您只想获取字符串值形式的 HTTP 响应，请使用 Http.getString 。您使用 Http.get 发布的示例假定结果采用 JSON 格式，并强制您将其解码为 Elm 值。

这是 random cat generator 的修改示例仅显示响应 JSON 转储而不是猫图片的代码:

getRandomGif : String -> Cmd Msg
getRandomGif topic =
  let
    url =
      "https://api.giphy.com/v1/gifs/random?api_key=dc6zaTOxFJmzC&tag=" ++ topic
  in
    Http.send NewGif (Http.getString url)

这是一个working example on ellie-app.com