Unfortunatelly, this module didn't work update methods, POST / PUT / PATCH / DELETE. So far, it works well :)
You can see a sample like below.
$ git clone https://github.com/comewalk/google-api-perl-client.git
$ cd google-api-perl-client
$ cat eg/calendar/events.pl
# QuickAdd
say '=== QuickAdd ===';
my $quickadded_event = $service->events->quickAdd(
calendarId => $calendar_id,
text => 'Appointment at Somewhere on June 3rd 10am-10:25am',
)->execute({ auth_driver => $auth_driver });
say $quickadded_event->{id};
# Recurring events
say '=== Make recurring events via patch ===';
$service->events->patch(
calendarId => $dest_calendar_id,
eventId => $quickadded_event->{id},
body => {
start => {
timeZone => 'Asia/Tokyo',
},
end => {
timeZone => 'Asia/Tokyo',
},
recurrence => [
'RRULE:FREQ=WEEKLY;UNTIL=20120831T100000Z',
],
}
)->execute({ auth_driver => $auth_driver });
say $quickadded_event->{updated};
Enjoy!