NAME
Aspect::Advice::After - Execute code after a function is called
SYNOPSIS
use Aspect;
after {
# Trace all returning calls to your module
print STDERR "Called my function " . $_->sub_name . "\n";
# Suppress exceptions AND alter the results to foo()
if ( $_->short_name eq 'foo' ) {
if ( $_->exception ) {
$_->return_value(1);
} else {
$_->return_value( $_->return_value + 1 );
}
}
} call qr/^ MyModule::\w+ $/
DESCRIPTION
The after
advice type is used to execute code after a function is called, regardless of whether or not the function returned normally or threw an exception.
The after
advice type should be used when you need to potentially make multiple different changes to the returned value or the thrown exception.
If you only care about normally returned values you should use returning
in the pointcut to exclude join points occuring due to exceptions.
If you only care about handling exceptions you should use throwing
in the pointcut to exclude join points occuring due to normal return.
AUTHORS
Adam Kennedy <adamk@cpan.org>
COPYRIGHT AND LICENSE
Copyright 2010 - 2013 Adam Kennedy.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.