'experimental::signatures';
use PerlX::Maybe;
use IO::Socket::SSL;
use Net::GitHub;
use DBI;
use JSON;
use Data::Dumper;
our $VERSION = '0.05';
=head1 NAME
GitHub::RSS - collect data from Github.
access_token => $self->token
),
},
);
=item *
B<token_file> - name and path of the JSON-format token file containing the
GitHub API token By default, that file is searched for under the
$!";
binmode $fh;
local $/;
my $json = <$fh>;
my $token_json = decode_json( $json );
return $token_json->{token};
} else {
# We'll run without a kn