Perl Google Calendar: Get Calendar

Back to Index

Returns an entry on the user's calendar list.
This example gets the calendar having the ID = "support@chilkatcloud.com".

Documentation: https://developers.google.com/google-apps/calendar/v3/reference/calendarList/get


use chilkat();

$rest = chilkat::CkRest->new();

#   Provide a previously obtained OAuth2 access token.
$oauth2 = chilkat::CkOAuth2->new();
$oauth2->put_AccessToken("OAUTH2_ACCESS_TOKEN");
$rest->SetAuthOAuth2($oauth2);

$success = $rest->Connect("www.googleapis.com",443,1,1);
if ($success != 1) {
    print $rest->lastErrorText() . "\r\n";
    exit;
}

$sbJson = chilkat::CkStringBuilder->new();
$success = $rest->FullRequestNoBodySb("GET",'/calendar/v3/users/me/calendarList/support@chilkatcloud.com',$sbJson);
if ($success != 1) {
    print $rest->lastErrorText() . "\r\n";
    exit;
}

if ($rest->get_ResponseStatusCode() != 200) {
    print "Received error response code: " . $rest->get_ResponseStatusCode() . "\r\n";
    print "Response body:" . "\r\n";
    print $sbJson->getAsString() . "\r\n";
    exit;
}

$json = chilkat::CkJsonObject->new();
$json->LoadSb($sbJson);

#  The following code parses the JSON response.
#  A sample JSON response is shown below the sample code.

$kind = $json->stringOf("kind");
$etag = $json->stringOf("etag");
$id = $json->stringOf("id");
$summary = $json->stringOf("summary");
$timeZone = $json->stringOf("timeZone");
$colorId = $json->stringOf("colorId");
$backgroundColor = $json->stringOf("backgroundColor");
$foregroundColor = $json->stringOf("foregroundColor");
$selected = $json->BoolOf("selected");
$accessRole = $json->stringOf("accessRole");
$primary = $json->BoolOf("primary");
$i = 0;
$count_i = $json->SizeOfArray("defaultReminders");
while ($i < $count_i) {
    $json->put_I($i);
    $method = $json->stringOf("defaultReminders[i].method");
    $minutes = $json->IntOf("defaultReminders[i].minutes");
    $i = $i + 1;
}

$i = 0;
$count_i = $json->SizeOfArray("notificationSettings.notifications");
while ($i < $count_i) {
    $json->put_I($i);
    $type = $json->stringOf("notificationSettings.notifications[i].type");
    $method = $json->stringOf("notificationSettings.notifications[i].method");
    $i = $i + 1;
}

print "Example Completed." . "\r\n";

Sample JSON Response Body

{
  "kind": "calendar#calendarListEntry",
  "etag": "\"1465249947472000\"",
  "id": "support@chilkatcloud.com",
  "summary": "support@chilkatcloud.com",
  "timeZone": "America/Chicago",
  "colorId": "14",
  "backgroundColor": "#9fe1e7",
  "foregroundColor": "#000000",
  "selected": true,
  "accessRole": "owner",
  "defaultReminders": [
    {
      "method": "popup",
      "minutes": 10
    }
  ],
  "notificationSettings": {
    "notifications": [
      {
        "type": "eventCreation",
        "method": "email"
      },
      {
        "type": "eventChange",
        "method": "email"
      },
      {
        "type": "eventCancellation",
        "method": "email"
      },
      {
        "type": "eventResponse",
        "method": "email"
      }
    ]
  },
  "primary": true
}