更改（CurlCode，字符串）以字符串在Haskell

Question

我想创建一个简单的haskell程序，从Web服务器获取JSON字符串并解析它。

我正在使用Network.Curl的curlGetString方法。

此方法具有以下类型签名

curlGetString :: URLString -> [CurlOption] -> IO (CurlCode, String) 

我的问题是：如何转换从（CurlCode，字符串）的输出字符串？

谢谢！

Answer 1

响应正文只是元组的第二个元素。首先curlGetString结果绑定在IO单子，然后用snd，或更好的，模式匹配：

main = do 
    (code, body) <- curlGetString "http://foo.example.com/" [...] 
    case code of 
    CurlOK -> putStr body 
    _ -> putStrLn $ "Error: " ++ show code 

不要忘记，你可以按类型与a Hoogle search发现功能。