What is my sub?

[ToddAndMargo]

Hi All,

I need to know the name of the subroutine I am in.

This is the way I use to do it in Perl 5:

         (my $Name = (caller(0))[3] ) ~~ s{.*::}{};

How do I do it in Perl 6?

Many thanks,
-T