C++ - 与Perl一样用于OOP的Moose

Question

我一直在玩Moose，感受它。我想要一个像C++中的纯虚函数的例子，但用Moose的说法（特别是以C++的方式）。我知道，即使穆斯强加一个比普通Perl更严格的模型，仍然有不止一种方法可以做我正在问的东西（通过方法修饰符或调用SUPER::）。这就是为什么我特意要求尽可能类似于C++的实现。至于“为什么？”这个限制？主要是好奇心，但也计划将一些C++代码移植到Moose的Perl中，以C++为中心的人可以认为主要是。

Answer 1

我能想到的使用角色，而不是子类的这样：

{ 
    package AbstractRole; 
    use Moose::Role; 
    requires 'stuff'; 
} 

{ 
    package Real; 
    use Moose; 
    with 'AbstractRole'; 
} 

这会给出一个编译错误，因为真正没有东西定义。

添加东西方法实现将使其工作：

{ 
    package Real; 
    use Moose; 
    with 'AbstractRole'; 

    sub stuff { print "Using child function!\n" } 
} 

Answer 2

这里是我的尝试（不角色，对角色看资料其他答案）：

package Abstract; 
use Moose; 

sub stuff; 

package Real; 
use Moose; 
extends 'Abstract'; 

override 'stuff' => sub { print "Using child function!\n"; } 

Answer 3

看来我不能做什么我想和驼鹿，但是我可以非常接近与角色。下面是从麋手动entry信息的角色：

角色对战抽象基类

如果您熟悉抽象基类的其他 语言概念 ，你可能会以相同的方式使用 角色。

您可以定义一个“仅接口” 角色，其中只包含所需方法的列表。

但是，消耗此 角色的任何类都必须通过从父级继承来实现所有必需的方法，或者直接执行或通过 执行。您 不能延迟方法要求 检查，以便它们可以由未来的子类实现 。

由于该角色直接定义了所需的 方法，因此将基类 添加到混合中将无法实现任何功能。 我们建议您简单地使用 这个接口实现的每个类中的接口角色。

Answer 4

你可能也想看看杰西Luehrs' MooseX::ABC。 这似乎与这里的一些实现非常相似。从简介：

package Shape; 
use Moose; 
use MooseX::ABC; 

requires 'draw'; 

package Circle; 
use Moose; 
extends 'Shape'; 

sub draw { 
    # stuff 
} 

my $shape = Shape->new; # dies 
my $circle = Circle->new; # succeeds 

package Square; 
use Moose; 
extends 'Shape'; # dies, since draw is unimplemented 

我知道，杰西是白天一个C++程序员。