view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

  directory:
    - inc
    - t
requires:
  App::Cmd: 0
  Config::General: 0
  File::HomeDir: 0
  HTTP::Request::Common: 0
  JSON: 0
  REST::Client: 0
  Try::Tiny: 0
  URI: 0
  perl: 5.10.0
resources:
  license: http://dev.perl.org/licenses/
version: 0.02

Makefile.PL  view on Meta::CPAN

all_from 'lib/CPAN/Mini/Inject/REST/Client.pm';
author   q{Jon Allen (JJ) <jj@jonalen.info>};
license  'perl';

requires 'App::Cmd';
requires 'Config::General';
requires 'File::HomeDir';
requires 'HTTP::Request::Common';
requires 'JSON';
requires 'REST::Client';
requires 'Try::Tiny';
requires 'URI';

build_requires 'Test::More';

install_script 'bin/mcpani-client';

auto_install;

WriteAll;

lib/CPAN/Mini/Inject/REST/Client/API.pm  view on Meta::CPAN

package CPAN::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 => 'ro', required => 1);
has 'protocol' => (isa => 'Str', is => 'ro', required => 1);
has 'port'     => (isa => 'Int', is => 'ro', required => 1);
has 'username' => (isa => 'Str', is => 'ro');
has 'password' => (isa => 'Str', is => 'ro');
has 'client'   => (isa => 'REST::Client', is => 'ro', lazy => 1, builder => '_build_client');