打印物体时:print($hash); # it outputs some sort of hex identifier: HASH(0X3A8154)my $map = {};$map->{$object_id} = $object; # where $object_id is the string result of $object when printed
我们使用Moose类将迭代器序列化为各种输出格式。我们将迭代器描述为一个属性: is => 'ro', required => 1,到目前为止,这一切都运行得很好,但我们最近一直在使用来准备迭代器,以供以后使用。这意味着我们可以开始编写以下代码: is => 'ro',
isa => 'CodeRef|Iterator::Simple::Ite