Symbol::Table - An easy interface to symbol tables (no eval(), no *typeglobs )
use Symbol::Table;
# constructor takes two arguments,
# (1) which TYPE of symbols (PACKAGE,CODE,SCALAR,ARRAY,HASH)
# and (2) what package namespace do you wish to examine
# (default value for arguments are 'PACKAGE' and current package namespace)
# the return value is a symbol table object.
my $st_pkg = Symbol::Table->New('PACKAGE', 'main');
# the keys to a PACKAGE type symbol table are all the # sub packages under the objects namespace. # For all other types, the keys are the names of the # symbols (of that TYPE) in the objects namespace. foreach my $subpkg (keys(%$st_pkg))
{
print "package main contains package '$subpkg'\n";
}
INSTALLATION
To install this module type the following:
perl Makefile.PL
make
make test
make install
DEPENDENCIES
none
COPYRIGHT AND LICENCE
Copyright (C) 2003 Greg London, All Rights Reserved
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.