__PACKAGE__->reflect->addSlot( tt_data => {}, perl_data => {}, ); #### $self->perl_data->{pass_around} = 'some calculated data'; $self->tt_data->{some_stuff} = $self->get_some_stuff(); if ( $self->perl_data->{pass_around} ){ blah