[PerlChina] Re: 求类似Class::Accessor的推荐模块

On 6/18/09, xu zhou <redicaps@gmail.com> wrote:

Class::Accessor可以自动生成存取器，但在当前包里面不能设定属性的默认值

求推荐一个有此功能的模块

出于性能考虑，我一般使用与之兼容的 Class::Accessor::Fast 模块。默认值的设定我多是自己在构造函数里搞定，例如：

  $ perl -e 'package Dog;use base"Class::Accessor::Fast";Dog->mk_accessors("age");sub new{bless{age=>25},shift}print Dog->new->age'
  25

moose除外

太重量级还没准备好学它

嗯，Moose 功能强大，但也意味着更大的性能开销，呵呵

Cheers,
-agentzh

--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
 要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
 要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛

-~----------~----~----~----~------~----~------~--~---