属性が設定されている場合はいつでも変更する必要があります。この例のように、アクセサーを自分で作成し、$self
の内容を直接書き留めていくという方法がありますか?Mooseでは、属性が設定されるたびに属性を変更するにはどうすればよいですか?
package Foo;
use Moose;
has 'bar' => (
isa => 'Str',
reader => 'get_bar',
);
sub set_bar {
my ($self, $bar) = @_;
$self->{bar} = "modified: $bar";
}
私はtrigger
と考えましたが、同じアプローチが必要と思われました。
$self
のハッシュリファレンスで直接作業していますか?Mooseで悪い習慣とみなされていますか、それとも問題ではないかと心配していますか?
トリガーでMoose :: Manual :: Attributesをチェック - http://search.cpan.org/~drolsky/Moose-0.88/lib/Moose/Manual/Attributes.pod#Triggers –