当前位置：文江博客话题详情

在驼鹿中，如何为子类中的超级类指定构造函数？

发布于 2025-01-17 11:15:55 字数 119 浏览 2 评论 0原文

我有一个带有一些属性的 Moose 类（x、y、z）。我对它进行子类化，对于子类，x 始终为 3。我如何在子类中指定它？

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

街道布景 2025-01-24 11:15:55

一个人可以使用 build> buildargs buildargs 。

around BUILDARGS => sub {
    my $orig  = shift;
    my $class = shift;
 
    return $class->$orig(@_, x => 3 );
};

One could use BUILDARGS.

around BUILDARGS => sub {
    my $orig  = shift;
    my $class = shift;
 
    return $class->$orig(@_, x => 3 );
};

回复收藏 0 原文

薄暮涼年 2025-01-24 11:15:55

我以前和 Moo 一起工作过，但看起来是一样的。您只需使用 + 在子类中声明属性即可覆盖之前的声明。

package Foo;
use Moose;
 
has 'a' => (
    is => 'rw',
    isa => 'Num',
);

has 'b' => (
    is => 'rw',
    isa => 'Num',
);

has 'c' => (
    is => 'rw',
    isa => 'Num',
);


package My::Foo;
use Moose;
 
extends 'Foo';
 
has '+a' => (
    default => 3,
);

I used to work with Moo but it seems to be the same. You just need to declare the property in the subclass using + to override previous declaration.

package Foo;
use Moose;
 
has 'a' => (
    is => 'rw',
    isa => 'Num',
);

has 'b' => (
    is => 'rw',
    isa => 'Num',
);

has 'c' => (
    is => 'rw',
    isa => 'Num',
);


package My::Foo;
use Moose;
 
extends 'Foo';
 
has '+a' => (
    default => 3,
);

回复收藏 0 原文

~没有更多了~