I know this is OLD! But i want to post this example, that works

use MooseX::Declare;
...
...
...
    has 'error_log' => (
        is => 'rw',
        isa => 'ArrayRef',
        default => sub { [] }
    );
...
...
...
    method register_error {
        shift;
        my $s_message = shift;
        return unless defined $s_message;
        my @a_temp = ( $s_message );
        $self->error_log->push ($s_message);
        return $self->error_log->length;        
    }
[download]

self->error_log->push does not work until i assign a "default" for the array.