【发布时间】：2010-08-13 07:19:23
【问题描述】：
有没有办法获取一段 perl 代码的封闭子例程的名称？ 例如：
sub foo { print where_am_i(); }
将输出'foo'。
【问题讨论】：
标签： perl subroutine
【发布时间】：2010-08-13 07:19:23
【问题描述】：
使用caller函数：
my $function = (caller(0))[3];
【讨论】：
【发布时间】：2010-08-13 07:19:23
【问题描述】：