Как я могу делегировать субобъект объекта с помощью ручек Moose?

Question

Moosedocumentation говорит, что я могу делегировать объекту thing достаточно легко.

has 'thing' => (
    ... 
    handles => { set_foo => [ set => 'foo' ] }, 
); 

# $self->set_foo(...) calls $self->thing->set('foo', ...) 

Но я действительно хочу, чтобы делегировать объект на вещи, в частности, объект DateTime

has 'thing' => (
    ... 
    handles => { 
     get_month => { datetime ... }, 
    }, 
); 

# $self->get_month calls $self->thing->datetime->month; 

как бы я должен построить ручки, чтобы заставить его сделать это?

Answer 1

has thing => (
    ... 
    handles => { 
     get_month => sub { $_[0]->thing->datetime->month }, 
    }, 
); 

Короткие добавления datetime_month к thing, вам придется написать свой собственный доверителя.