通常我会保护检查,然后用信号量设置代码,但是Moose的检查和设置行为是在moose内部,而不是我自己的代码.
我怎样才能消除这种竞争条件?
解决方法 通常,您可以从外部控制对对象或属性的访问.my $foo_bar_lock = Coro::Semaphore->new();my $foo = Foo->new();{ my $guard = $foo_bar_lock->guard; # ... use $foo's bar ...}{ my $guard = $foo_bar_lock->guard; # ... use $foo's bar ...}
但是,它也可以从内部完成.
has bar_lock => ( reader => '_get_bar_lock',default => sub { Coro::Semaphore->new() },);has bar => ( reader => '_get_bar',writer => '_set_bar',builder => '_build_bar',lazy => 1,);sub _build_bar { ... }sub get_bar { my $self = shift; my $guard = $self->_get_bar_lock->guard; return $self->_get_bar();} sub set_bar { my $self = shift; my $guard = $self->_get_bar_lock->guard; return $self->_set_bar(@_);}
(如果您更喜欢单个get-set访问器而不是单独的get和set访问器,请使用访问器而不是读写器.)
总结以上是内存溢出为你收集整理的perl – 如何使用Lazy属性和Coro来预防Moose中的种族状况全部内容,希望文章能够帮你解决perl – 如何使用Lazy属性和Coro来预防Moose中的种族状况所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)