package Bread::Board::SetterInjection; BEGIN { $Bread::Board::SetterInjection::AUTHORITY = 'cpan:STEVAN'; } { $Bread::Board::SetterInjection::VERSION = '0.29'; } use Moose; use Bread::Board::Types; with 'Bread::Board::Service::WithClass', 'Bread::Board::Service::WithParameters', 'Bread::Board::Service::WithDependencies'; has '+class' => (required => 1); sub get { my $self = shift; my $o = $self->class->new; $o->$_($self->param($_)) foreach $self->param; return $o; } __PACKAGE__->meta->make_immutable; no Moose; 1; __END__ =pod =head1 NAME Bread::Board::SetterInjection =head1 VERSION version 0.29 =head1 DESCRIPTION =head1 METHODS =over 4 =item B =back =head1 BUGS All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT. =head1 AUTHOR Stevan Little =head1 COPYRIGHT AND LICENSE This software is copyright (c) 2013 by Infinity Interactive. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. =cut