File Coverage

blib/lib/WWW/ARDB/Result/Item.pm

Criterion	Covered	Total	%
statement	14	15	93.3
branch	2	4	50.0
condition	8	8	100.0
subroutine	5	5	100.0
pod	2	2	100.0
total	31	34	91.1

package WWW::ARDB::Result::Item;
our $AUTHORITY = 'cpan:GETTY';

# ABSTRACT: Item result object for WWW::ARDB

use Moo;
use Types::Standard qw( Str Int Num ArrayRef HashRef Maybe );
use namespace::clean;

our $VERSION = '0.002';


has id => (
    is       => 'ro',
    isa      => Str,
    required => 1,
);


has name => (
    is       => 'ro',
    isa      => Str,
    required => 1,
);


has description => (
    is      => 'ro',
    isa     => Maybe[Str],
    default => sub { undef },
);


has rarity => (
    is      => 'ro',
    isa     => Maybe[Str],
    default => sub { undef },
);


has type => (
    is      => 'ro',
    isa     => Maybe[Str],
    default => sub { undef },
);


has value => (
    is      => 'ro',
    isa     => Maybe[Num],
    default => sub { undef },
);


has weight => (
    is      => 'ro',
    isa     => Maybe[Num],
    default => sub { undef },
);


has stack_size => (
    is      => 'ro',
    isa     => Maybe[Int],
    default => sub { undef },
);


has icon => (
    is      => 'ro',
    isa     => Maybe[Str],
    default => sub { undef },
);


has found_in => (
    is      => 'ro',
    isa     => ArrayRef,
    default => sub { [] },
);


has maps => (
    is      => 'ro',
    isa     => ArrayRef,
    default => sub { [] },
);


has breakdown => (
    is      => 'ro',
    isa     => ArrayRef,
    default => sub { [] },
);


has crafting => (
    is      => 'ro',
    isa     => ArrayRef,
    default => sub { [] },
);


has updated_at => (
    is      => 'ro',
    isa     => Maybe[Str],
    default => sub { undef },
);


has _raw => (
    is      => 'ro',
    isa     => HashRef,
    default => sub { {} },
);

sub from_hashref {
    my ($class, $data) = @_;

    return $class->new(
        id          => $data->{id},
        name        => $data->{name},
        description => $data->{description},
        rarity      => $data->{rarity},
        type        => $data->{type},
        value       => $data->{value},
        weight      => $data->{weight},
        stack_size  => $data->{stackSize},
        icon        => $data->{icon},
        found_in    => $data->{foundIn} // [],
        maps        => $data->{maps} // [],
        breakdown   => $data->{breakdown} // [],
        crafting    => $data->{crafting} // [],
        updated_at  => $data->{updatedAt},
        _raw        => $data,
    );
}


sub icon_url {
    my $self = shift;
    return unless $self->icon;
    return 'https://ardb.app' . $self->icon if $self->icon =~ m{^/};
    return $self->icon;
}


1;

__END__