use LWP::UserAgent;

my $ua = LWP::UserAgent->new;
$ua->env_proxy;

my $gh = Pithub->new(
    ua => $ua,        # <-- add this
    user => $user,
    token => $token
);