WW::PGXN::User;
use WWW::PGXN::Tag;
use WWW::PGXN::Mirror;
use HTTP::Tiny;
use URI::Template;
use JSON ();
use Carp;
our $VERSION = v0.13.0;
sub new {
my($class, %params) = @_;
my $self = bl
elf;
}
sub get_distribution {
my ($self, $dist, $version) = @_;
my $data = $self->_fetch_json(
(defined $version ? 'meta' : 'dist'),
{ dist => lc $dist, version => lc($version
_fetch_json(extension => { extension => lc $ext })
or return;
WWW::PGXN::Extension->new($self, $data);
}
sub get_user {
my ($self, $user) = @_;
my $data = $self->_fetch_json(user
ls = $rel->{stable} || $rel->{testing} || $rel->{unstable};
my $meta = $self->{_pgxn}->_fetch_json(meta => {
version => lc $rels->[0]{version},
dist => lc $self->{name},
})
{ $meta };
}
sub _merge_by_dist {
my $self = shift;
my $by_dist = $self->{_pgxn}->_fetch_json(dist => {
dist => lc $self->{name}
}) || {};
@{$self}{keys %{ $by_dist }} = value
list of special files in the distribution, such as C<Changes>,
C<README>, C<Makefile>, and C<META.json>, among others. Available only from an
API server. Returns an empty list for distributions fetche