Introspection

[Parrot Raiser]

Could someone supply a link to a clear example of a Perl 6 subroutine
finding its own name, please?
I know there's a method, but haven't managed to produce an effective
search string for an example of its use.