Aspect::Pointcut::Not

  use Aspect;
  
  # High-level creation
  my $pointcut1 = ! call 'one';
  
  # Manual creation
  my $pointcut2 = Aspect::Pointcut::Not->new(
      Aspect::Pointcut::Call->new('one')
  );

Aspect::Pointcut::Not 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 <adamk@cpan.org>

Marcel Gruenauer <marcel@cpan.org>

Ran Eilam <eilara@cpan.org>

Copyright 2001 by Marcel Gruenauer

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.