Google API Programming with Perl

use WebService::GoogleAPI::Client ; ## assumes gapi.json configuration in working directory with scoped project and user authorization my $gapi_client = WebService::GoogleAPI::Client->new( debug => 1, gapi_json => './gapi.json' , user => 'peter@pscott.com.au' ); Resource Type Supported Methods list get getByUrl getByPath listByUser search insert delete patch update Blogs no yes yes no yes no no no no no Posts yes yes no yes no yes yes yes yes yes Comments yes yes no no no no no no no no Pages yes yes no no no no no no no no Users no yes no no no no no no no no my $gapi_agent = WebService::GoogleAPI::Client->new( debug => 1, gapi_json=> './gapi.json' , user=> 'peter@shotgundriver.com' ); ## AVAILABLE API IDS if ( 1 == 0 ) { my @apis = $gapi_agent >list_of_