Perl - POO/Moose - signatures de méthode

Question

J'aime au code OO en Perl comme ceci:

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!'); 
} 

Malheureusement cela est assez lent, je ne pouvais pas trouver un équivalent souris ou Moo lui. Quel dommage que Perl n'ait rien à voir avec PyPy. Est-ce que quelqu'un sait comment archiver la même chose avec les implémentations plus légères?

Answer 1

Le module Moops expérimental est une autre extension de syntaxe qui fonctionne assez similaire. Il est inspiré par MooseX :: Declare (mais est plus rapide) et par le projet p5-mop qui essaie d'amener une telle syntaxe dans le noyau perl.

Votre exemple traduirait sans modifications significatives. Si vous souhaitez spécifier un backend MOP, vous pouvez déclarer une classe comme class Foo using Moose, mais par défaut Moo, ce qui est plus simple que Moose.