IOC::Service::Literal - An IOC Service object whose component is a literal value
use IOC::Service::Literal;
my $container = IOC::Container->new();
# use a literal here for our log_file
$container->register(IOC::Service::Literal->new('log_file' => "logfile.log" ));
$container->register(IOC::Service->new('logger' => sub {
my $c = shift;
return FileLogger->new($c->get('log_file'));
}));
$container->register(IOC::Service->new('application' => sub {
my $c = shift;
my $app = Application->new();
$app->logger($c->get('logger'));
return $app;
}));
$container->get('application')->run();
In this IOC framework, the IOC::Service::Literal object holds a literal value
which does not need to be initialized. This IOC::Service subclass is
specifically optimized to handle values which need no initialization, like
literal values, such as numbers and strings. It is sometimes useful for these
types of values to be included in your configuration, this helps reduce the
overhead for them.
+--------------+
| IOC::Service |
+--------------+
|
^
|
+-----------------------+ +-----------------+
| IOC::Service::Literal |---(instance)--->| <Literal Value> |
+-----------------------+ +-----------------+
- new ($name, $literal)
- Creates a service with a $name, and uses the
$literal value which need not be initialized.
- name
- Returns the name of the service instance.
- setContainer ($container)
- This is a no-op method, since the service is not initialized, then it does
not need an instance of the container.
- removeContainer
- This is a no-op method, see
"setContainer" above.
- instance
- This method returns the literal value held by the service object.
- Work on the documentation
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.
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.