UPDATE it's not that it works because the accessor is not actually formed. It's just no error is thrown. Just put a call to $m->y and you will see Can't locate object method "y" via package...package M1; use Mouse; has 'x' => (is => 'rw'); has 'y' => (ks => 'rw'); 1; use M1; my $m = M1->new(x => 55); warn $m->x; $m->x(888); warn $m->x;
In reply to Re: Mouse as prelude to Moose?
by metaperl
in thread Mouse as prelude to Moose?
by metaperl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |