perl - 我可以使用基于 Moose 的对象将正则表达式传递给 isa() 吗？

Question

我可以在 Moose 中使用 isa 并将正则表达式作为参数吗？如果不可能，我可以用除 ->isa 以外的其他东西来达到同样的目的吗？ ?

好的，有以下类型 Animal::Giraffe , Animal::Carnivore::Crocodile ，我想做->isa(/^Animal::/) ，我可以这样做吗？如果我不能，我可以用什么来达到预期的效果？

Answer 1

这些相关的类型都应该“做”同样的角色，动物。然后你可以写:

has 'animal' => (
    is       => 'ro',
    does     => 'Animal',
    required => 1,
);

现在你有了比正则表达式更可靠的东西来确保你的程序的一致性。