accéder à un Moose Array

Question

J'ai du mal à trouver la syntaxe (ce qui est évident et je suis stupide) pour avoir poussé vers un Moose Array. Ceci est une continuation de this question. il me semble que j'ai besoin de plus qu'une simple valeur pour mon cas particulier. Essayer de l'implémenter en utilisant une méthode Moose-ish (peut-être que c'est faux?) Mais je ne le fais évidemment pas bien.

use Moose::Role; 
has 'tid_stack' => (
    traits => ['Array'], 
    is  => 'rw', 
    isa => 'ArrayRef[Str]', 
    default => sub { [] }, 
); 


around 'process' => sub { 
    my $orig = shift; 
    my $self = shift; 
    my ($template) = @_; 

    $self->tid_stack->push(get_hrtid($template)); 

    $self->$orig(@_) 
}; 

Answer 1

Vous avez mal compris ce que fait traits => ['Array']. Cela vous permet de configurer les méthodes handles. Il ne vous permet pas d'appeler directement des méthodes comme push. Vous avez besoin de use Moose::Autobox pour cela (et vous n'avez pas besoin du trait Array).

Ou vous pourriez faire:

has 'tid_stack' => (
    traits => ['Array'], 
    is  => 'rw', 
    isa => 'ArrayRef[Str]', 
    default => sub { [] }, 
    handles => { 
     push_tid => 'push', 
    }, 
); 

... 

    $self->push_tid(get_hrtid($template));