Yet Another CPAN Grep

Business-CPI-Gateway-MercadoPago ( T/TB/TBR/Business-CPI-Gateway-MercadoPago-0.102.tar.gz, TBR, 2013; MetaCPAN )

Business-CPI-Gateway-MercadoPago/lib/Business/CPI/Gateway/MercadoPago.pm ( view source; MetaCPAN )

I's Mercado Pago driver

use Moo;
use Carp;
use URI;
use Data::Dumper;
use LWP::UserAgent ();
use JSON;

extends 'Business::CPI::Gateway::Base';

our $VERSION = '0.102'; # VERSION

has '+currency' =>

 );
        $ua->default_header( 'Accept'       => 'application/json' );
        $ua->default_header( 'Content-Type' => 'application/json' );

        return $ua;
    },
);

has access_token => (

 '$auth_url': " . $r->status_line
      if $r->is_error;

    my $json         = from_json( $r->content );
    my $access_token = $json->{access_token};

    die "Coundn't retried access_token" unless