Perl 6:从里面获取函数的名称

Question

在Perl 6中,如何在运行时从其体内获取函数/子例程的名称？

例如,

sub foo {
    say "My name is: " ~  <WHAT-API-HERE??> ;
}
...
foo();

上面的代码应该打印:

My name is: foo

我查看了MOP,FAQ和Functions等地方.

Answer 1

sub foo { say &?ROUTINE.name }
foo

显示:

foo

请参阅该&$ROUTINE文档.