sendGetRequest :: String -> [(String, ByteString)] -> IO ByteString
sendGetRequest url args = simpleHTTP (defaultGETRequest_ url') >>= getResponseBody
sendGetRequest :: String -> [(String, ByteString)] -> IO ByteString
sendGetRequest url args = simpleHTTP (defaultGETRequest_ url') >>= getResponseBody