Devel::InnerPackage - find all the inner packages of a package
use Foo::Bar;
use Devel::InnerPackage qw(list_packages);
my @inner_packages = list_packages('Foo::Bar');
Given a file like this
package Foo::Bar;
sub foo {}
package Foo::Bar::Quux;
sub quux {}
package Foo::Bar::Quirka;
sub quirka {}
1;
then
list_packages('Foo::Bar');
will return
Foo::Bar::Quux
Foo::Bar::Quirka
Return a list of all inner packages of that package.
Simon Wistow <simon@thegestalt.org>
Copyright, 2005 Simon Wistow
Distributed under the same terms as Perl itself.
None known.