8 lines
249 B
Haskell
8 lines
249 B
Haskell
|
{-# LANGUAGE OverloadedStrings #-} --needed for string arguments
|
||
|
|
import Network.HTTP.Simple
|
||
|
|
|
||
|
|
main :: IO ()
|
||
|
|
main = do
|
||
|
|
apiResponse <- httpLBS "POST http://httpbin.org/get"
|
||
|
|
|
||
|
|
putStrLn $ "Status code: " ++ show (getResponseStatusCode apiResponse)
|