Net::GitHub::V3::PullRUsersContributed Perl DoNet::GitHub::V3::PullRequests(3)NAMENet::GitHub::V3::PullRequests - GitHub Pull Requests API
SYNOPSIS
use Net::GitHub::V3;
my $gh = Net::GitHub::V3->new; # read L<Net::GitHub::V3> to set right authentication info
my $pull_request = $gh->pull_request;
DESCRIPTION
To ease the keyboard, we provied two ways to call any method which
starts with :user/:repo
1. SET user/repos before call methods below
$gh->set_default_user_repo('fayland', 'perl-net-github'); # take effects for all $gh->
$pull_request->set_default_user_repo('fayland', 'perl-net-github'); # only take effect to $gh->pull_request
my @pulls = $pull_request->pulls();
2. If it is just for once, we can pass :user, :repo before any
arguments
my @pulls = $pull_request->pulls($user, $repo);
METHODS
Pull Requets
<http://developer.github.com/v3/pulls/>
pulls
my @pulls = $pull_request->pulls();
my @pulls = $pull_request->pulls( { state => 'open' } );
pull
my $pull = $pull_request->pull($pull_id);
create_pull
update_pull
my $pull = $pull_request->create_pull( {
"title" => "Amazing new feature",
"body" => "Please pull this in!",
"head" => "octocat:new-feature",
"base" => "master"
} );
my $pull = $pull_request->update_pull( $pull_id, $new_pull_data );
commits
files
my @commits = $pull_request->commits($pull_id);
my @files = $pull_request->files($pull_id);
is_merged
merge
my $is_merged = $pull_request->is_merged($pull_id);
my $result = $pull_request->merge($pull_id);
Pull Request Comments API
<http://developer.github.com/v3/pulls/comments/>
comments
comment
create_comment
update_comment
delete_comment
my @comments = $pull_request->comments($pull_id);
my $comment = $pull_request->comment($comment_id);
my $comment = $pull_request->create_comment($pull_id, {
"body" => "a new comment"
});
my $comment = $pull_request->update_comment($comment_id, {
"body" => "Nice change"
});
my $st = $pull_request->delete_comment($comment_id);
AUTHOR & COPYRIGHT & LICENSE
Refer Net::GitHub
perl v5.14.2 2012-03-22 Net::GitHub::V3::PullRequests(3)
