view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

  HTML::Strip: 0
  IO::Pager: 0
  JSON::XS: 0
  LWP::Protocol::https: 0
  LWP::Simple: 0
  Net::GitHub: 0
  Scope::Guard: 0
  Term::ANSIColor: 0
  Term::ReadLine: 0
  Text::Wrap: 0
  Try::Tiny: 0
  URI: 0
resources:
  bugtracker: http://github.com/c9s/App-gh/issues
  license: http://dev.perl.org/licenses/
  repository: http://github.com/c9s/App-gh
version: 0.64

Makefile.PL  view on Meta::CPAN

requires 'File::Spec';
requires 'File::HomeDir';
requires 'LWP::Simple';
requires 'URI';
requires 'Text::Wrap';
requires 'JSON';
requires 'HTML::Strip';
requires 'Term::ReadLine';
requires 'Scope::Guard';
requires 'Error';
requires 'Try::Tiny';
requires 'Net::GitHub';
requires 'IO::Pager';
requires 'LWP::Protocol::https';

# `gh recent` support
recommends 'XML::Atom';
recommends 'IO::Socket::SSL';

install_script 'scripts/gh';

lib/App/gh/API.pm  view on Meta::CPAN

package App::gh::API;
use warnings;
use strict;
use Carp ();
use LWP::UserAgent;
use URI;
use JSON;
use App::gh::Utils;
use Try::Tiny;
use Net::GitHub;

sub new_ua {
    my $class = shift;
    my $ua = LWP::UserAgent->new;  # TODO: make this switchable.  better client ? Furl ?
    $ua->timeout(10);
    $ua->env_proxy;
    return $ua;
}