haskell - 在 http-conduit 中处理 HTTP Query 参数

Question

我要下载网址的内容

http://example.com/foobar?key1=value1&key2=value2

使用http-conduit（GET 请求）。

我怎样才能做到这一点：

a) 假设我已经知道完整的（即编码的 URL） b) 如果某些参数是动态的，因此不是 URL 编码的？

注意：这个问题是以问答方式回答的，因此故意不显示任何研究工作。

Answer 1

关于 a)：

您可以使用simpleHttp包含查询参数的 URL，就像文档中的示例一样：

{-# LANGUAGE OverloadedStrings #-}
import Network.HTTP.Conduit
import qualified Data.ByteString.Lazy as LB

main :: IO ()
main =
    simpleHttp "http://example.com/foobar?key1=value1&key2=value2" >>= LB.putStr

关于 b)：

您需要[(ByteString, Maybe ByteString)]包含查询参数的类型的键/值元组列表。

{-# LANGUAGE OverloadedStrings #-}
import Network.HTTP.Conduit
import Data.ByteString (ByteString)
import qualified Data.ByteString.Lazy.Char8 as LB

queryParams :: [(ByteString, Maybe ByteString)]
queryParams = [
    ("key1", Just "value1"),
    ("key2", Just "value2")]

main :: IO ()
main = do
    request <- parseUrl "http://example.com/foobar"
    let request' = setQueryString queryParams request
    response <- withManager $ httpLbs request'
    LB.putStrLn $ responseBody response

注意：这至少需要http-conduit 2.1。另请注意，建议Manager在适用的情况下重用实例。