更改（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發現功能。