Symbol::Global::Name(3) finds name and type of a global variable

SYNOPSIS


package My;
our $VERSION = '0.1';
use Symbol::Global::Name;
print Symbol::Global::Name->find( \$VERSION );
# prints '$My::VERSION'

DESCRIPTION

Lookups symbol table to find an element by reference.

METHODS

find

    Symbol::Global::Name->find( \$VERSION );
    Symbol::Global::Name->find( \$VERSION, package => 'My::Package' );
    Symbol::Global::Name->find( reference => \$VERSION );
    Symbol::Global::Name->find( reference => \$VERSION, package => 'My::Package' );

Takes a reference and optional package name. Returns name of the referenced variable as long as it's in the package or sub-package and it's a global variable. Returned name is prefixed with type sigil, eg. '$', '@', '%', '&' or '*'.

AUTHOR

Ruslan Zakirov <[email protected]>

LICENSE

Under the same terms as perl itself.