use Moose;
__PACKAGE__->register_events(qw( bareservice simplecontainer blockinjector setterinjector constructorinjector nestedcontainer));
sub bareservice {
my ($self, $ctxt) = @_;
my $body = $self->response->body || '';
$body .= '_configassets_' . '_' . $self->resolve_asset( service => 'somevar' ) . '_';
$self->response->body( $body );
return OK;
}
sub simplecontainer {
my ($self, $ctxt) = @_;
my $body = $self->response->body || '';
$body .= '_simplecontainer_' . '_' . $self->resolve_asset( service => 'MyContainer/somevar' ) . '_';
$self->response->body( $body );
return OK;
}
sub blockinjector {
my ($self, $ctxt) = @_;
my $body = $self->response->body || '';
my $simple_moose = $self->resolve_asset( service => 'MyContainer/simple_moose' );
$body .= '_blockinjector_' . '_' . $simple_moose->name . '_' . $simple_moose->foo . '_' . $simple_moose->favorite_holiday . '_';
$self->response->body( $body );
return OK;
}
sub constructorinjector {
my ($self, $ctxt) = @_;
my $body = $self->response->body || '';
my $simple_moose = $self->resolve_asset( service => 'Container2/simple_moose' );
$body .= '_constructorinjector_' . '_' . $simple_moose->name . '_' . $simple_moose->foo . '_' . $simple_moose->favorite_holiday . '_';
$self->response->body( $body );
return OK;
}
sub setterinjector {
my ($self, $ctxt) = @_;
my $body = $self->response->body || '';
my $simple_moose = $self->resolve_asset( service => 'Container3/simple_moose' );
$body .= '_setterinjector_' . '_' . $simple_moose->name . '_' . $simple_moose->foo . '_' . $simple_moose->favorite_holiday . '_';
$self->response->body( $body );
return OK;
}
sub nestedcontainer {
my ($self, $ctxt) = @_;
my $body = $self->response->body || '';
my $sm1 = $self->resolve_asset( service => 'Container::One/sm' );
$body .= '_sm1_' . '_' . $sm1->name . '_' . $sm1->foo . '_' . $sm1->favorite_holiday . '_';
my $sm2 = $self->resolve_asset( service => 'Container::One/Container::Two/sm' );
$body .= '_sm2_' . '_' . $sm2->name . '_' . $sm2->foo . '_' . $sm2->favorite_holiday . '_';
$self->response->body( $body );
return OK;
}
1;