perl – 当我实际使用时,我应该何时使Moose类不可变 – > met

通常我会在课程结束时通过__PACKAGE __-> meta-> make_immutable在汇编中完成一个课程.但是,我何时应该创建一个在运行时将角色组合成自身的类不可变？我是否应该这样做以获得更好的性能,或者这与make_immutable不兼容？ make_immutable似乎加速了对象的实例化,但是一旦对象被实例化它会做什么吗？

例如,有些东西：

BUILD {
  my $self = shift;
  use Module::Load;

  ### Use the arguments passed in to determine roles applicable to 
  ### this instance of the object. Load and apply roles.
  for my $role ($self->_determine_roles()) { 
    load $role;
    $role->meta->apply($self);
  }

  ### $self is now a Class::MOP::Class::__ANON__... anonymous class
  ### Should I then be saying I'm done mutating it with something like this?
  ### can make_immutable even be run on an object instance and not a package?
  $self->meta->make_immutable;
}

即使上面的代码适用于单个包,当一个对象以’Foo’角色反复自身,导致一个匿名类时会发生什么,然后第二个对象用’Foo’祝福自己(成为同一个anon类)然后’酒吧’的角色？当第二个对象将自己保存到不可变的第一个匿名类中时,它是否会正常工作,然后尝试将该角色应用于现在不可变的匿名类来创建一个新的匿名类？

通过阅读Moose::Meta::Class上的文档,似乎只有一个类可以是不可变的,而不是对象的实例.如果是这样,我是否应该忽略make_immutable,因为我正在改变我的类？