Net::GitHub::V3::PullRequests - GitHub Pull Requests API

       Refer Net::GitHub

perl v5.36.0                                       2022-10-08                 Net::GitHub::V3::PullRequests(3pm)

Toeasethekeyboard,weproviedtwowaystocallanymethodwhichstartswith: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);

   METHODSPullRequets

       <http://developer.github.com/v3/pulls/>

       pulls
               my @pulls = $pull_request->pulls();
               my @pulls = $pull_request->pulls( { state => 'open' } );
               while (my $pr = $pull_request->next_pull( { state => 'open' } )) { ...; }

       pull
               my $pull  = $pull_request->pull($pull_number);

       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_number, $new_pull_data );

       commits
       files
               my @commits = $pull_request->commits($pull_number);
               my @files   = $pull_request->files($pull_number);
               while (my $commit = $pull_request->next_commit($pull_number)) { ...; }
               while (my $file = $pull_request->next_file($pull_number)) { ...; }

       is_merged
       merge
               my $is_merged = $pull_request->is_merged($pull_number);
               my $result    = $pull_request->merge($pull_number);

       PullRequestCommentsAPI

       <http://developer.github.com/v3/pulls/comments/>

       comments
       comment
       create_comment
       update_comment
       delete_comment
               my @comments = $pull_request->comments($pull_number);
               while (my $comment = $pull_request->next_comment($pull_number)) { ...; }
               my $comment  = $pull_request->comment($comment_id);
               my $comment  = $pull_request->create_comment($pull_number, {
                   "body" => "a new comment",
                   commit_id => '586fe4be94c32248043b344e99fa15c72b40d1c2',
                   path => 'test',
                   position => 1,
               });
               my $comment = $pull_request->update_comment($comment_id, {
                   "body" => "Nice change"
               });
               my $st = $pull_request->delete_comment($comment_id);

       PullRequestReviewsAPI

       <http://developer.github.com/v3/pulls/reviews/>

       reviews
       review
       create_review
       update_review
       delete_review
               my @reviews = $pull_request->reviews($pull_number);
               while (my $review = $pull_request->next_review($pull_number)) { ...; }
               my $review  = $pull_request->review($review_id);
               my $review  = $pull_request->create_review($pull_number, {
                   "body" => "a new review",
                   commit_id => '586fe4be94c32248043b344e99fa15c72b40d1c2',
                   event => 'APPROVE',
               });
               my $review = $pull_request->update_review($review_id, {
                   "body" => "Nice change"
               });
               my $st = $pull_request->delete_review($review_id);

       PullRequestReviewAPI

       <https://developer.github.com/v3/pulls/review_requests/>

       reviewers
       add_reviewers
       delete_reviewers
               my @reviewers = $pull_request->reviewers($pull_number);
               my $result = $pull_request->add_reviewers($pull_number, {
                   reviewers => [$user1, $user2],
                   team_reviewers => [$team1],
               );
               my $result = $pull_request->delete_reviewers($pull_number, {
                   reviewers => [$user1, $user2],
                   team_reviewers => [$team1],
               );

       Net::GitHub::V3::PullRequests - GitHub Pull Requests API

           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;