Я написал класс объектов Moose, который расширяет другой класс объектов Moose:
package MySubClass;
use Moose;
extends MySuperClass;
У меня есть атрибут, который я хотел бы автоматически построить при создании экземпляра объекта:
has 'id' => (
is => 'ro',
isa => 'Str',
builder => '_build_id',
init_arg => undef,
);
sub _build_id {
my $self = shift;
# both ssn and bnn are attributes of MySuperClass
return $self->ssn . $self->bnn;
}
Это не сработает, если я не установлю id
как ленивый.Почему?
Как осуществляется построение extend
объектов?