table of contents
other versions
- stretch 0.02-2+b3
Sub::Current(3pm) | User Contributed Perl Documentation | Sub::Current(3pm) |
NAME¶
Sub::Current - Get the current subroutineSYNOPSIS¶
use Sub::Current; sub f { # ... if ($some_condition) { # let's recurse! ROUTINE->(); } # ... }
DESCRIPTION¶
Sub::Current makes available a function "ROUTINE()", that returns a code reference pointing at the currently executing subroutine.In a special block (BEGIN, END, CHECK, INIT, and UNITCHECK in Perl 5.10) this function will return undef.
Outside of a special block (that is, at the top level of a program) "ROUTINE()" will return undef as well.
COPYRIGHT¶
(c) Copyright 2007 by Rafael Garcia-Suarez.This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
2014-04-24 | perl v5.24.1 |