You are viewing the version of this documentation from Perl 5.12.4. View the latest version

CONTENTS

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.