perl - Moo の別の属性に依存する属性構成を作成することは可能ですか?

Question

さまざまなチュートリアルとMooのドキュメントを読みましたが、やりたいことを説明しているものが見つかりません。

私がやりたいことは、次のようなものです。

has 'status' => (
  is  => 'ro',
  isa => Enum[qw(pending waiting completed)],
);

has 'someother' => (
  is       => is_status() eq 'waiting'   ? 'ro' : 'rw',
  required => is_status() eq 'completed' ? 1    : 0,
  isa      => Str,
  lazy     => 1,
);

もし私がこの考えにかなり外れているのなら、別の属性の値に応じて、属性「ro」または「rw」を必須にするかどうかをどのように作成すればよいでしょうか?

Enum はType::Tinyからのものであることに注意してください。