我可以使Moose属性“写入一次”吗？

Question

我想有一个不需要的Moose属性，只能设置一次。

如果我使用is => 'ro'我必须在创建对象时设置属性，但我希望能够在之后添加它（只要它尚未设置）。

Answer 1

MooseX::SetOnce

Answer 2

使用的方法修改：

has 'attr' => (
    is => 'rw', 
    predicate => 'is_set', 
    ... 
}; 

before 'attr' => sub { 
    my $self = shift; 
    die 'attr already set' if $self->is_set; 
};