Yet Another CPAN Grep

Microsoft-Azure-AccessToken ( D/DO/DOUGLISH/Microsoft-Azure-AccessToken.tar.gz, DOUGLISH, 2013; MetaCPAN )

Microsoft-Azure-AccessToken/lib/Microsoft/Azure/AccessToken.pm ( view source; MetaCPAN )

warnings FATAL => 'all';

use LWP::UserAgent;
use URL::Encode 'url_encode';
use Data::Dumper;
use JSON;

=head1 NAME

Microsoft::Azure::AccessToken - Microsoft Azure Access Token implementation

=head

 ) {
		my $resturn = undef;

		my $content = $response->decoded_content;
		my $js = eval { decode_json( $content ) };

		if ( $@ ) {
			print STDERR "Unable to parse response\n";
			return undef;
		}