Mercurial > pub > Impl
view _test/Test/Config/Bar.pm @ 417:3ed0c58e9da3 ref20150831
working on di container, tests
author | cin |
---|---|
date | Mon, 02 Nov 2015 01:56:53 +0300 |
parents | |
children |
line wrap: on
line source
package Test::Config::Bar; use strict; use IMPL::declare { base => [ 'IMPL::Object' => undef ], props => [ value => 'r' ] }; sub CTOR { my $this = shift; $this->value(shift) if @_; } 1;