perlquestion
woodpeaker
Hi Mongers,
Today I tried to refactor my own code. And today I tried to use Moose, not strict/warnings.
Well, I created need structure in exists object, for example:
<code>
package Package::Systen::Foo;
use Moose;
use Package::System::Config;
has 'CONFIG' => (is => 'rw', isa => 'Object');
sub _init {
my $self = shift;
$self->CONFIG(Package::System::Config->new());
}
1;
</code>
Well, when I creating object it give me blank package without any methods and properties. Also, when I trying to $foo->_init() nothing happen and nothing changes in *Foo object. Also, after that application stops and nothing show me as error. I tried to use strict, warnings, perl -w and eval. Test::More said just 'Test failed'.
How do you think what problem in it? And how can I resolve that.
PS. perl version is 5.10