NAME

Symbol::Global::Name - 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 <ruz@bestpractical.com>

LICENSE

Under the same terms as perl itself.