Devel::InnerPackage

NAME

Devel::InnerPackage − find all the inner packages of a package

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 <simon@thegestalt.org>

COPYING

Copyright, 2005 Simon Wistow

Distributed under the same terms as Perl itself.

BUGS

None known.