Skip to content

Instantly share code, notes, and snippets.

@owainlewis

owainlewis/Example.hs

Last active June 1, 2020 20:30
Show Gist options
  • Star 33 You must be signed in to star a gist
  • Fork 2 You must be signed in to fork a gist
  • Save owainlewis/4132852 to your computer and use it in GitHub Desktop.
Save owainlewis/4132852 to your computer and use it in GitHub Desktop.
Download ZIP
Haskell HTTP GET request example
Raw
Example.hs
module Example () where
import Network.HTTP
-- Non HTTPS
-- 1. Perform a basic HTTP get request and return the body
get :: String -> IO String
get url = simpleHTTP (getRequest url) >>= getResponseBody
-- 2. Get the response code
getCode :: String -> IO ResponseCode
getCode url = simpleHTTP req >>= getResponseCode
where req = getRequest url
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment