perl - Perl と Net::OAuth2 を使用して POST イベントを Google カレンダーに送信する

Question

Perl で webapp を開発しており、OAuth2 を使用してユーザーの Google カレンダーにイベントを作成しようとしています。認証とカレンダーデータのリクエストは正常に機能しています.POSTリクエストを送信してJSONまたはハッシュデータを添付することになると、私は完全に立ち往生しています. このためのモジュールに付属のメソッドはありますか? ドキュメントは、ここのどこにも私を指していません。LWP が方法を提供すると思いますが、これはかなりのオーバーヘッドのようです。

これまでのところ、カレンダーイベントを取得する方法は次のとおりです（今のところ単純なコンソールアプリとして）：

use Net::OAuth2::Profile::WebServer;

my $auth = Net::OAuth2::Profile::WebServer->new
    ( name           => 'Google Calendar'
    , client_id      => $id
    , client_secret  => $secret
    , site           => 'https://accounts.google.com'
    , scope          => 'https://www.googleapis.com/auth/calendar'
    , authorize_path    => '/o/oauth2/auth'
    , access_token_path => '/o/oauth2/token'
    , redirect_uri      => $redirect
    );

print $auth->authorize_response->as_string;
my $code=<STDIN>;

my $access_token = $auth->get_access_token($code);

my $response = $access_token->get('https://www.googleapis.com/calendar/v3/calendars/2j6r4iegh2u8o2409jk8k2g838@group.calendar.google.com/events');
  $response->is_success
      or die "error: " . $response->status_line;

print $response->decoded_content;

お時間をありがとうございました！

マーカス