Mercurial > pub > Impl
view _test/Test/Config/Foo.pm @ 419:bbc4739c4d48 ref20150831
working on IMPL::Config::Container
author | cin |
---|---|
date | Sun, 29 Jan 2017 10:30:20 +0300 |
parents | 3ed0c58e9da3 |
children |
line wrap: on
line source
package Test::Config::Foo; use strict; use IMPL::declare { base => [ 'IMPL::Object' => undef ], props => [ value => 'r' ] }; sub CTOR { my $this = shift; $this->value(shift) if @_; } 1;