基本認証があるHTTPS GETでコンテンツを取得する例
Network.HTTPでHTTPSをサポートしていないとのことであったので、
http-conduitをパッケージを使用
http-conduitでは特になにもせずに、HTTPSが利用可能(サンプルの転記)
import Network.HTTP.Conduit main = withSocketsDo $ do request' <- parseUrl url >>= return . applyBasicAuth user pass let request = request' { checkStatus = \_ _ -> Nothing } res <- withManager $ httpLbs request print res url = undefined -- 実際はURLを指定する user = undefined -- 実際はURLを指定する pass = undefined -- 実際はURLを指定する