(Perl) MercadoLibre - GET Request with Access Token in Query Params
Demonstrates how to send an HTTPS GET request to MercadoLibre with the access token specified as a query parameter.
use chilkat();
# 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";
|