The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
DMAKI / Pickles-0.10 / t / MyApp / etc / container.pl 

use MyApp::Model::Test;

register( model_obj => MyApp::Model::Test->new );
register( InitValue => sub { bless {}, 'MyApp::ControllerValue'; } );