/ 
package-0.0031
/ 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, @import)

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 routine');

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.