RosettaCodeData/Task/HTTPS/Haskell/https-1.hs

9 lines
204 B
Haskell

#!/usr/bin/runhaskell
import Network.HTTP.Conduit
import qualified Data.ByteString.Lazy as L
import Network (withSocketsDo)
main = withSocketsDo
$ simpleHttp "https://sourceforge.net/" >>= L.putStr