SYNOPSIS
use Foo::Bar;
use Devel::InnerPackage qw(list_packages);
my @inner_packages = list_packages('Foo::Bar');
DESCRIPTION
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
METHODS
list_packages <package name>
Return a list of all inner packages of that package.AUTHOR
Simon Wistow <[email protected]>COPYING
Copyright, 2005 Simon WistowDistributed under the same terms as Perl itself.
BUGS
None known.