Logical 'or' pointcut
use Aspect; # High-level creation my $pointcut1 = call 'one' | call 'two' | call 'three'; # Manual creation my $pointcut2 = Aspect::Pointcut::Or->new( Aspect::Pointcut::Call->new('one'), Aspect::Pointcut::Call->new('two'), Aspect::Pointcut::Call->new('three'), );
Aspect::Pointcut::And is a logical condition, which is used to create higher-order conditions from smaller parts.
It takes two or more conditions, and applies appropriate logic during the various calculations that produces a logical set-wise 'and' result.
Copyright 2001 by Marcel Gru\*:nauer
Some parts copyright 2009 - 2013 Adam Kennedy.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.