Perl

Get a List of Message IDs in GMail User's Mailbox

See more GMail REST API Examples

Demonstrates how to get a list of message IDs in a GMail mailbox. The "userId" can be either the user's email address or the special value "me" to indicate the authenticated user. Perl

use chilkat();

$success = 0;

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

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

$http->put_AuthToken("ACCESS_TOKEN");

$http->put_Accept("application/json");

$resp = chilkat::CkHttpResponse->new();
$success = $http->HttpNoBody("GET","https://www.googleapis.com/gmail/v1/users/userId/messages",$resp);
if ($success == 0) {
    print $http->lastErrorText() . "\r\n";
    exit;
}

print "Response Status Code: " . $resp->get_StatusCode() . "\r\n";

$jsonResponse = chilkat::CkJsonObject->new();
$jsonResponse->Load($resp->bodyStr());
$jsonResponse->put_EmitCompact(0);
print $jsonResponse->emit() . "\r\n";

if ($resp->get_StatusCode() != 200) {
    print "Failed." . "\r\n";
    exit;
}

# {
#   "messages": [
#     users.messages Resource
#   ],
#   "nextPageToken": string,
#   "resultSizeEstimate": unsigned integer
# }

$resultSizeEstimate = $jsonResponse->IntOf("resultSizeEstimate");
$i = 0;
$count_i = $jsonResponse->SizeOfArray("messages");
while ($i < $count_i) {
    $jsonResponse->put_I($i);
    $id = $jsonResponse->stringOf("messages[i].id");
    $threadId = $jsonResponse->stringOf("messages[i].threadId");
    $i = $i + 1;
}