Skip to content

Instantly share code, notes, and snippets.

@accraze

accraze/discogs.hs

Created February 14, 2016 00:21
Show Gist options
  • Save accraze/bd159d2358ed5f020f4b to your computer and use it in GitHub Desktop.
Save accraze/bd159d2358ed5f020f4b to your computer and use it in GitHub Desktop.
Download ZIP
Discogs API Haskell GET Request
Raw
discogs.hs
module Main where
import Control.Lens
import qualified Data.ByteString.Lazy as BL
import Network.Wreq
main :: IO ()
main = do
response <- get "https://api.discogs.com/releases/249504"
print $ BL.take 1000 (response ^. responseBody)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment