NAME
Sub::Identify - Retrieve names of code references
SYNOPSIS
use Sub::Identify ':all';
my $subname = sub_name( $some_coderef );
my $p = stash_name( $some_coderef );
my $fully_qualified_name = sub_fullname( $some_coderef );
defined $subname
and print "this coderef points to sub $subname in package $p\n";
DESCRIPTION
Sub::Identify
allows to retrive the real name of code references. For this, it uses perl's introspection mechanism, provided by the B
module.
It provides three functions : sub_name
returns the name of the subroutine (or __ANON__
if it's an anonymous code reference), stash_name
returns its package, and sub_fullname
returns the concatenation of the two.
In case of subroutine aliasing, those functions always return the original name.
AUTHOR
Written by Rafael Garcia-Suarez (rgarciasuarez at mandriva dot com).
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.