On Fri, Jul 09, 2004 at 11:00:28AM -0400, Michael G Schwern wrote: > wrap *Test::Builder::diag, pre => sub { > $_[1] = color('red') . $_[1]; > $_[-2] =~ s/$/color 'reset'/e; > };
Glancing at the Hook::LexWrap, I see it's possible to simulate an "around" wrapper by calling the original function and putting the answer in $_[-1]. Which makes me wonder why there isn't a native around wrapper in Hook::LexWrap? Andrew