Perl 5 version 24.4
A special token that returns a reference to the current subroutine, or
undef outside of a subroutine.
The behaviour of __SUB__ within a regex code block (such
) is subject to change.
This token is only available under