How can I get the name of the current subroutine in Perl?
Posted
by kiruthika
on Stack Overflow
See other posts from Stack Overflow
or by kiruthika
Published on 2010-04-01T10:49:22Z
Indexed on
2010/04/01
12:43 UTC
Read the original article
Hit count: 281
Filed under:
perl
In Perl we can get the name of the current package and current line number Using the predefined variables like __PACKAGE__ and __LINE__.
Like this I want to get the name of the current subroutine:
use strict;
use warnings;
print __PACKAGE__;
sub test()
{
print __LINE__;
}
&test();
In the above code I want to get the name of the subroutine inside the function test.
© Stack Overflow or respective owner
