package Package::Systen::Foo; use Moose; use Package::System::Config; has 'CONFIG' => (is => 'rw', isa => 'Object'); sub _init { my $self = shift; $self->CONFIG(Package::System::Config->new()); } 1;