2010-07-14 125 views
7

什么是正确方式从另一个驼鹿对象创建一个实例?在实践中,我已经看到这种做法很多:从另一个Moose对象实例化Moose对象的正确方法?

$obj->meta->name->new() 
$obj->new() ## which has been deprecated and undeprecated 
(blessed $obj)->new() 
-- and, its bastard variant: (ref $obj)->new() 
$obj->meta->new_object() 

然后,如果你有traits?有没有一种透明的方式来支持这一点?做任何这些工作与anonymous classes

+1

如在创建对象的“克隆”或同一对象的新实例? – 2010-07-14 23:09:18

+0

同一对象的新实例。 – 2010-07-15 01:41:16

+1

如果该实例具有角色,是否要保留它们? – Schwern 2010-07-15 09:32:38

回答

6

您的选择,$obj->meta->name->new()(blessed $obj)->new()都是最安全的。

实现特征的方法是,创建一个匿名子类并将角色应用于该子类,并将实例重新布局到该子类中。这意味着这些解决方案中的任何一个都可以很好地处理特性。 Perl缺乏真正的匿名子类(每个包都必须有名称空间),Moose通过在匿名类的通用名称空间中创建一个名称来解决此问题。

如果你花了一秒钟的时间来尝试一些示例代码,你会看到这个实例。

$perl -Moose -E'with q[MooseX::Traits]; 
    package Role; use Moose::Role; 
    package main; say Class->with_traits(q[Role])->new->meta->name' 

    MooseX::Traits::__ANON__::SERIAL::1 

希望有帮助。