Subject: | Missing implementation of the 'writer' attribute |
$ cat x.pl
package nowriter;
use Mouse;
has 'item' => (
isa => 'Int',
is => 'rw',
writer => '_set_item',
);
package main;
my $n = nowriter->new;
$n->_set_item(1);
$ perl x.pl
Can't locate object method "_set_item" via package "nowriter" at x.pl
line 13.
Changing to 'use Moose' above makes the error go away.
Cheers,
Mark.
--
Mark Lawrence