在Perl中使用sub foo后做一些事情?

ask*_*ker 1 perl

after foo => sub{
    ...
}
Run Code Online (Sandbox Code Playgroud)

我只是偶然发现了上面的代码,这些代码在sub foo完成后调用,

这是如何运作的?

它似乎不是Perl的内置功能,对吧?

Mik*_*ike 5

它是Moose方法修饰符之一.

方法修饰符可用于向方法添加行为,而无需修改这些方法的定义.

  • @asker:Moose和Mouse是CPAN模块的集合,它简化了面向对象Perl的创建.[Moose :: Manual](http://search.cpan.org/dist/Moose/lib/Moose/Manual.pod)比我更好,更详细地解释了它. (3认同)