package Foo;
use Moose;

has 'some_method' => (
  is => 'ro',
  isa => 'ArrayRef',
  default => sub { +[] },
);

sub add_things {
  my $self = shift;

  push @{ $self->some_member }, @_;
}