NAME

Acme::Innuendo - polite access to Perl's private parts

SYNOPSIS

use Acme::Innuendo;

# Create an alias

nudge_nudge( special_place(), "alias_sub",
  wink_wink( special_place(), "some_sub" )
);

# Walk the symbol table

walk_the_dog( special_place(), sub {
  my ($namespace, $symbol, $ref) = @_;
  print $namespace, $symbol, "\n";
} );

DESCRIPTION

This module provides an alternative method of addressing the symbol table for those who condider it akin to "touching Perl's genitals."

special_place

$root_namespace = special_place();

$module_namespace = special_place( $module_name );

Returns the name space of the specified module, or the root namespace if no module is specified.

wink_wink

$ref = wink_wink( $namespace, $symbol );

Returns the glob for the symbol in the given namespace, if it exists.

nudge_nudge

nudge_nudge( $namespace, $symbol, $ref );

Changes or adds the symbol in the namespace.

walk_the_dog

walk_the_dog( $namespace, sub { ... } );

Walks a namespace and sends symbol information to the callback routine.

SEE ALSO

This module is a bit of humor. For more serious applications, see the following modules on CPAN:

Alias
Devel::LexAlias
Lexical::Alias
Package::Alias
Tie::Alias
Tie::Alias::Array
Tie::Alias::Handle
Tie::Alias::Hash
Variable::Alias

AUTHOR

Robert Rothenberg <rrwo at cpan.org>

current Maintainer: Rene Schickbauer <rene.schickbauer at gmail.com>

REPORTING BUGS

We don't know of any bugs, but that doesn't mean there aren't any. Please the CPAN bugtracker or mail Rene Schickbauer directly.

COPYRIGHT AND LICENSE

Copyright (C) 2004 by Robert Rothenberg. All Rights Reserved.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.

Now maintained by Rene Schickbauer, so i guess everything after version 0.02 is (C) 2010 Rene Schickbauer