IOC::Service::ConstructorInjection - An IOC Service object which uses Constructor Injection
use IOC::Service::ConstructorInjection; # this will call : # FileLogger->new() # when it creates a logger # component instance my $service = IOC::Service::ConstructorInjection->new('logger' => ('FileLogger', 'new', [])); # this will call : # FileLogger->new($container->get('log_file'), "some other argument") # when it creates a logger # component instance my $service = IOC::Service::ConstructorInjection->new('logger' => ( 'FileLogger', 'new', [ IOC::Service::ConstructorInjection->ComponentParameter('log_file'), "some other argument" ])); # this will call : # FileLogger->new($container->find('/files/log_file'), "some other argument") # when it creates a logger # component instance my $service = IOC::Service::ConstructorInjection->new('logger' => ( 'FileLogger', 'new', [ IOC::Service::ConstructorInjection->ComponentParameter('/files/log_file'), "some other argument" ]));
In this IOC framework, the IOC::Service::ConstructorInjection object holds instances of components to be managed.
+--------------+ | IOC::Service | +--------------+ | ^ | +------------------------------------+ | IOC::Service::ConstructorInjection | +------------------------------------+
Creates a service with a $name, and uses the $component_class and $component_constructor string arguments to initialize the service on demand.
$name
$component_class
$component_constructor
If the $component_class and $component_constructor arguments are not defined, an IOC::InsufficientArguments exception will be thrown.
Upon request of the component managed by this service, an attempt will be made to load the $component_class. If that loading fails, an IOC::ClassLoadingError exception will be thrown with the details of the underlying error. If the $component_class loads successfully, then it will be inspected for an available $component_constructor method. If the $component_constructor method is not found, an IOC::ConstructorNotFound exception will be thrown. If the $component_constructor method is found, then it will be called with the values found in $paramaters. However, before $paramaters are passed, they are first looped through looking for any "ComponentParameters" (these are place holders created with the class method ComponentParameter (see below)), and replaces these items with the proper values extracted from the IOC framework.
$paramaters
ComponentParameter
Given a $component_name this will create a place holder suitable for placement in the $parameters argument of the new method. The $component_name must be a valid service name available to the service either through get or find.
$component_name
$parameters
new
get
find
None that I am aware of. Of course, if you find a bug, let me know, and I will be sure to fix it.
I use Devel::Cover to test the code coverage of my tests, see the CODE COVERAGE section of IOC for more information.
http://docs.codehaus.org/display/PICO/Constructor+Injection
stevan little, <stevan@iinteractive.com>
Copyright 2004-2007 by Infinity Interactive, Inc.
http://www.iinteractive.com
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install IOC, copy and paste the appropriate command in to your terminal.
cpanm
cpanm IOC
CPAN shell
perl -MCPAN -e shell install IOC
For more information on module installation, please visit the detailed CPAN module installation guide.