如何在 Moose 中声明/使用静态成员？

Question

我正在使用 Moose 对象，但我需要为仅执行一次且与对象无关的事情声明静态成员。

您有什么想法或例子吗？

谢谢

多坦。

Answer 1

您可以使用 MooseX::ClassAttribute：

package SomeClass;
use Moose;
use MooseX::ClassAttribute;

class_has 'static_member' => ( is => 'rw' );

使用 SomeClass 访问成员->static_member。

Answer 2

我尝试按照 bvr 的建议使用 MooseX::ClassAttribute，但最终我只是将它们设置为默认的只读成员：

has 'static_thing' => ( is => 'ro', init_arg => undef, default => 42 );

这似乎更简单。

Answer 3

在所有的鹿性之下，仍然是普通的旧 Perl

，所以只需在类 .pm 文件中设置一个变量

package SomeClass;
use Moose;

my $instance_counter = 0;

around BUILDARGS => sub {
    $instance_counter += 1;
}

. . .