Aspect::Pointcut::And - Logical 'and' pointcut
use Aspect; # High-level creation my $pointcut1 = call 'one' & call 'two' & call 'three'; # Manual creation my $pointcut2 = Aspect::Pointcut::And->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.
Adam Kennedy <email@example.com>
Marcel Grünauer <firstname.lastname@example.org>
Ran Eilam <email@example.com>
Copyright 2001 by Marcel Grünauer
Some parts copyright 2009 - 2012 Adam Kennedy.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.