Perl Moose可以创建多个访问者吗？

Question

因此，Perl的标准命名约定是snake_case，但我正在编写一个模块来与使用camelCase的REST API进行交互，使用Moose基础结构创建对象。我宁愿让对象适用于任何一种情况，但我似乎无法获得多个Moose-y访问器。以下是我能想到的唯一方法。

has 'full_name' => (
    is  => 'rw',
    isa => 'Str',
);

sub fullName {return shift->full_name(@_)};

使用Moose的内置插件更好的方法吗？

Answer 1

Bah，简单回答。我完全忽略了MooseX::Aliases，它可以让你轻松地做到这一点：

has 'full_name' => (
    is  => 'rw',
    isa => 'Str',
    alias => 'fullName', # or alias => [qw(fullName)] for even more
);

不像我想的那样内置Moose，但绝对足够。