Devel::Events::Filter::Callback - Callback based Devel::Events::Filter
use Devel::Events::Filter::Callback;
Devel::Events::Filter::Callback->new(
callback => sub {
my ( @event ) = @_;
return if bad_event(@event); # drop it
return map { filter($_) } @event; # change it
},
handler => $handler,
);
- handler
- Devel::Events::Handler
- callback
- a code ref
- filter_event
- Delegates to "callback"
Bugs may be submitted through the RT bug tracker
<https://rt.cpan.org/Public/Dist/Display.html?Name=Devel-Events> (or
bug-Devel-Events@rt.cpan.org <mailto:bug-Devel-Events@rt.cpan.org>).
XXXX XXX'XX (Yuval Kogman) <nothingmuch@woobling.org>
This software is copyright (c) 2007 by XXXX XXX'XX (Yuval Kogman).
This is free software; you can redistribute it and/or modify it
under the same terms as the Perl 5 programming language system itself.