MooseX ::声明如何从属性默认方法返回ArrayRef？

Question

我知道这可能是我的一部分Perl或驼鹿的某些部分的基本误解，但我似乎不能够从一个default方法返回一个数组引用：

has '_directories' => (
    is => 'ro', 
    isa => 'ArrayRef[Str]', 
    lazy => 1, 
    init_arg => undef, 
    default => method {return File::Spec->splitdir($self->relativeDirectory)}); 

给出：

Attribute (_directories) does not pass the type constraint because: 
Validation failed for 'ArrayRef[Str]' with value 3 

我该如何分拣出来？

Answer 1

splitdir返回列表，而不是arrayref。您可以使用[]构造函数从列表构造arrayref：

default => method {return [ File::Spec->splitdir($self->relativeDirectory) ] },