content: sub Main()
      ' Criando o objeto de URL Transfer
      url = "https://api.pexels.com/v1/search?query=nature&per_page=1"
      urlTransfer = CreateObject("roUrlTransfer")
      
      ' Cabeçalhos com o token da API do Pexels
      headers = CreateObject("roAssociativeArray")
      headers["Authorization"] = "Bearer ZlSomFI0CZ6Bnjeoum2Wxfs9eYyUJmgEUHpXS4v0uSCJaJWzFl89wfZ8"
      
      ' Definindo os cabeçalhos da requisição
      urlTransfer.SetRequestHeaders(headers)
      
      ' Enviando a requisição GET
      response = urlTransfer.GetToString(url)
      
      ' Verificando o código de resposta
      if urlTransfer.GetResponseCode() = 200
          print "Requisição bem-sucedida!"
          
          ' Usando roJSONParser para analisar o JSON da resposta
          print response
          
      else
          print "Erro na requisição: "; urlTransfer.GetResponseCode()
      end if
  end sub
  