- or download this
use Class::Delegation
......
send => -OTHER, to => -SELF->page;
sub page { ${$_[0]}{app}{currTran}{currPage} }
- or download this
use Aspect;
before { ..... } call qr/^MyClass/;
- or download this
...
MyClass::Application::AUTOLOAD->
Could not delegate at /...../lib/Aspect/Hook/LexWrap.pm line 63
MyClass::Application::DESTROY->
- or download this
Can't call method "match_define" without a package or object reference
+ at /...../lib/Aspect/Pointcut/NotOp.pm line 13.