Net::GitHub::V3::Gists(3pm) | User Contributed Perl Documentation | Net::GitHub::V3::Gists(3pm) |
Net::GitHub::V3::Gists - GitHub Gists API
use Net::GitHub::V3; my $gh = Net::GitHub::V3->new; # read L<Net::GitHub::V3> to set right authentication info my $gist = $gh->gist;
Git Data
<http://developer.github.com/v3/gists/>
my @gists = $gist->gists; my @gists = $gist->gists('nothingmuch'); while (my $g = $gist->next_gist) { ...; }
my @gists = $gist->public_gists; my @gists = $gist->starred_gists; while (my $g = $gist->next_public_gist) { ...; } while (my $g = $gist->next_starred_gist) { ...; }
my $gist = $gist->gist($gist_id);
my $gist = $gist->create( { "description" => "the description for this gist", "public" => 'true', "files" => { "file1.txt" => { "content" => "String file contents" } } } );
my $g = $gist->update( $gist_id, { description => "edited desc" } );
my $st = $gist->star($gist_id); my $st = $gist->unstar($gist_id); my $st = $gist->is_starred($gist_id);
my $g = $gist->fork($gist_id); my $st = $gist->delete($gist_id);
Gist Comments API
<http://developer.github.com/v3/gists/comments/>
my @comments = $gist->comments(); while (my $c = $gist->next_comment) { ...; } my $comment = $gist->comment($comment_id); my $comment = $gist->create_comment($gist_id, { "body" => "a new comment" }); my $comment = $gist->update_comment($gist_id, $comment_id, { "body" => "Nice change" }); my $st = $gist->delete_comment($gist_id, $comment_id);
Refer Net::GitHub
2022-10-08 | perl v5.34.0 |