我喜欢像这样在 Perl 中编写 OO 代码:
use MooseX::Declare;
use Method::Signatures::Modifiers;
use v5.14.2;
class Talker
{
method talk (Str $text) {
$self=>say $text;
}
my $talk_object = Talker->new();
$talk_object->talk('Hello!');
}
不幸的是,这很慢,我找不到任何与其等效的鼠标或 Moo。可惜 Perl 没有 PyPy 之类的东西。
有人知道如何使用较轻的实现来归档相同的内容吗?