В Perl, используя Moo
, вы можете реализовать around
подпрограммы, которые обернутся вокруг других методов в классе.
around INSERT => sub {
my $orig = shift;
my $self = shift;
print "Before the original sub\n";
my $rv = $orig->($self, @_);
print "After the original sub\n";
};
Как это поведение может быть реализовано в Raku , предпочтительно с помощью role
?