/ 
package-0.0035
/ package

NAME

package - makes an alias of the current package

SYNOPSIS

package ThisPAckage;

sub new { }

use package "Alias", qw'new', { alias => 'new' };

my $ref = &Alias::new;
my $obj = Alias->alias;

or

package main;

package::alias('Alias', 'Original');

my $alias = new Alias();
$alias->sub_from_original;

DESCRIPTION

use package makes an alias of the current package and establishs IS-A relationship with current package and alias at compile time

METHODS

alias($alias, $original, ...)

use package makes as alias of the original and imports the symbols in import in the namespace of alias

package::alias($alias, $original, qw'$var $foo basename');

package::alias($alias, $original, [{'@as' => '@it', '@like' => '@it'}, qw'sub function'], 'routine', ['ggg'];

AUTHOR

Holger Seelig holger.seelig@yahoo.de

COPYRIGHT

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