The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

AI::MicroStructure::Alias - Alias one structure to another

SYNOPSIS

    package AI::MicroStructure::bonk;
    use AI::MicroStructure::Alias;
    our @ISA = qw( AI::MicroStructure::Alias );
    __PACKAGE__->init('batman');
    1;

    =head1 NAME

    AI::MicroStructure::bonk - The bonk structure

    =head1 DESCRIPTION

    This structure is just an alias of the C<batman> theme.

    =cut

    # no __DATA__ section required!

DESCRIPTION

AI::MicroStructure::Alias is the base class for any structures that is simply an alias of another structure.

METHOD

AI::MicroStructure::Alias defines a single method, init() that make aliases very easy to write (see the full example in SYNOPSIS):

init( $original )

init() must be called when the subclass is loaded, so as to correctly load and alias the original structure.

$original is the name of the original structure we want to alias.

AUTHOR

Philippe 'BooK' Bruhat, <book@cpan.org>

COPYRIGHT & LICENSE

Copyright 2006 Philippe 'BooK' Bruhat, All Rights Reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.