Network.HTTPでHTTPSをサポートしていないとのことであったので、 http-conduitをパッケージを使用http-conduitでは特になにもせずに、HTTPSが利用可能(サンプルの転記) import Network.HTTP.Conduit main = withSocketsDo $ do request' <- parseUrl url >>…

コード import Network.URI (escapeURIString, isAllowedInURI) host = "http://www.yahoo.co.jp/test" params = [("query","テスト"), ("key", "キー")] main = putStr $ buildURI host params buildURI host params = host ++ "?" ++ (join "&" $ map aQue…

import Network.URI import Network.HTTP url = "http://www.yahoo.co.jp/" main = simpleHTTP (getRequest url) >>= getResponseBody