Yet Another CPAN Grep

CPAN-Mini-Inject-REST-Client ( J/JO/JONALLEN/CPAN-Mini-Inject-REST-Client-0.02.tar.gz, JONALLEN, 2011; MetaCPAN )

CPAN-Mini-Inject-REST-Client/lib/CPAN/Mini/Inject/REST/Client/API.pm ( view source; MetaCPAN )

Mini::Inject::REST::Client::API;

use Moose;
use Carp qw/confess/;
use HTTP::Request::Common;
use JSON;
use MIME::Base64;
use REST::Client;
use Try::Tiny;
use URI;

has 'host'     => (isa => 'Str', is

----------

sub process {
    my ($self, $response) = @_;

    my $content = try {
        decode_json($response->responseContent);
    } catch {
        $response->responseContent;
    };