これに対してどのような方法が作成されていますか？ perl

Question

この1ライナーの説明が必要です。これはset（）メソッドを呼び出すだけですか？または、他の何か？

ありがとうございました！

has 'shape' => (is => 'rw');

オブジェクトは、MooseX :: FollowPBPを使用しています。

Answer 1

これは基本的なムーゼの構文です。 hasは、クラス内の属性を定義するMooseキーワードです。属性名は形であり、isr ead-w riteです。

It'sdocumentedinmultipleplaces。

has $name|@$names => %options

これは、現在のクラスに与えられた$nameの属性をインストールします。最初のパラメータが配列参照の場合、リスト内のすべて$nameの属性が作成されます。 %optionsは、Moose :: Meta :: Attribute（Class :: MOP :: Attributeから継承）のコンストラクタに渡されるので、有効なオプションの完全なドキュメントがそこにあります。

MooseX::FollowPBPは直接関係しません。これはDamose Conwayの提案に続いて、Perlベストプラクティスのデフォルトアクセサー$obj->shapeを$obj->get_shapeと$obj->set_shapeに変更するようMooseの動作を変更するだけです。