burguillos.info/lib/BurguillosInfo/Specie.pm

25 lines
318 B
Perl

package BurguillosInfo::Specie;
use v5.36.0;
use strict;
use warnings;
use feature 'signatures';
use Moo::Role;
sub can_be_global {
return 0;
}
sub serialize ($self) {
return {
id => $self->id,
name => $self->name,
image => $self->image,
};
}
requires 'id name image';
1;