小编Cod*_*ter的帖子

这个问题涉及Perl和Moose继承.

假设我有父母班和婴儿班.宝贝'延伸'父母.如果两个类都具有属性"name",那么Baby如何在不获取自己名称的情况下访问父级的名称？

package Baby;
use Moose;
extends 'Parent';

has 'name', is => 'ro', isa => 'Str', default => 'Baby';

注意:父类与名称default =>'Parent'基本相同.

所以问题是,在我的程序中如何访问Parent的名字？

例如:

...
$baby = Baby->new();
say "my name is " . $baby->name();
say "my Parent's name is " . ???? 

谢谢!