Groups is not part of the official userinfo OpenID schema, but is a quasi-standard. Only a single JSON group list "[ ]" is supported. Other nested lists or data structures are not (yet) supported.
=i
:Authen::OAuth2::Unimplemented;
our $VERSION = '0.01';
use Net::OAuth2::Profile::WebServer;
use JSON;
=head1 NAME
RT::Authen::OAuth2::Unimplemented - stub to die on unimplemented integrations
=cu
age RT::Authen::OAuth2::Google;
our $VERSION = '0.01';
use Net::OAuth2::Profile::WebServer;
use JSON;
=head1 NAME
RT::Authen::OAuth2::Google - Handler for Google OAuth2 logins
=cut
=head2 Exampl
h containing key/value pairs of user
profile metadata items. Google returns JSON.
=back
=cut
sub Metadata {
my ($self, $response_content) = @_;
return (decode_json($response_content));
}