Aspect::Weaver - aspect weaving functionality
$weaver = Aspect::Weaver->new; print join(',', $weaver->get_sub_names); # all wrappable subs $weaver->install(before => 'Employee::get_name', $wrapper_code); $weaver->install(after => 'Employee::set_name', $wrapper_code);
Used by the Aspect::Advice manpage to get all wrappable subs, and to install a
before/after hook on a sub. Uses the Aspect::Hook::LexWrap manpage for the
wrapping itself, and Devel::Symdump for accessing symbol table info.
See the Aspect pod for a guide to the Aspect module.