perl - Set::Scalar Universe 是如何工作的？

Question

我创建了许多集合，我注意到所有集合都共享同一个宇宙。

我无法弄清楚宇宙是如何维持的。它是由脚本中的所有集合共享的一个宇宙(某个全局变量)吗？

Answer 1

嗯，实际上它是 Set::Scalar::Universe 中的词法变量:

my $UNIVERSE = __PACKAGE__->new;

sub universe {
    my $self = shift;

    return $UNIVERSE;
}

然后在 Set::Scalar你有:

$self->{ universe } = Set::Scalar::Universe->universe;

它只是获取该变量的副本(在加载 Set::Scalar::Universe 时已初始化。

Set::Scalar 文档顺便提到不相交的宇宙尚未实现。