从HTTP响应中获取标头

Question

我无法弄清楚如何从服务器的响应中获取Content-Length标头：

import Network.HTTP.Conduit

main = do 
      headers <- getHeaders "http://fdsfdsfds.fd"

      --??? this doesn't compile and a wrong way to go
      head $ filter (\x -> hContentLength (fst x)) headers

getHeaders :: String -> IO ResponseHeaders
getHeaders url = do
  req <- parseUrl url
  res <- withManager $ httpLbs req
  return $ responseHeaders res

您的建议？

Answer 1

那是因为hContentLength只是一个不区分大小写的字符串，而不是函数。你无法应用它。

但是，由于CI a是Eq的{​​{1}}个实例，因此您只需使用Eq a：

lookup