Perl

MercadoLibre - GET Request with Access Token in Query Params

See more MercadoLibre Examples

Demonstrates how to send an HTTPS GET request to MercadoLibre with the access token specified as a query parameter. Perl

use chilkat();

$success = 0;

# This example assumes the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

$http = chilkat::CkHttp->new();

# First get our previously obtained OAuth2 access token.
$jsonToken = chilkat::CkJsonObject->new();
$success = $jsonToken->LoadFile("qa_data/tokens/mercadolibre.json");
if ($success == 0) {
    print "Failed to load JSON access token." . "\r\n";
    exit;
}

# Use your seller ID.
$http->SetUrlVar("SELLER_ID","577815702");
$http->SetUrlVar("ACCESS_TOKEN",$jsonToken->stringOf("access_token"));

$responseStr = $http->quickGetStr("https://api.mercadolibre.com/questions/search?seller_id={$SELLER_ID}&api_version=4&access_token={$ACCESS_TOKEN}");
if ($http->get_LastMethodSuccess() == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

print $responseStr . "\r\n";