#! /usr/bin/env perl
use Moo::Google;
use Log::Log4perl::Shortcuts qw(:all);
use Data::Dumper qw (Dumper);

my $gapi = Moo::Google->new(debug => 0);
my $user = me@gmail.com';

$gapi->auth_storage->setup({ type => 'jsonfile', path => 'config.json' });
$gapi->user($user);
$gapi->do_autorefresh;

my $r1 = $gapi->People->People;