Devel::Events::Filter::Warn(3)

NAME
Devel::Events::Filter::Warn - log every event to STDERR

VERSION
version 0.09

SYNOPSIS
        # can be used as a handler
        my $h = Devel::Events::Filter::Warn->new();

        # or as a filter in a handler chain

        my $f = Devel::Events::Filter::Warn->new(
                handler => $sub_handler,
        );

DESCRIPTION
This is a very simple debugging aid to see that your filter/handler chains are set up correctly.

A useful helper function you can define is something along the lines of:

        sub _warn_events ($) {
                my $handler = shift;
                Devel::Events::Filter::Warn->new( handler => $handler );
        }

and then prefix handlers which seem to not be getting their events with "_warn_events" in the source code.

METHODS

filter_event @event
    calls "warn "@event"". and returns the event unfiltered.

SUPPORT
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>).

AUTHOR
XXXX XXX'XX (Yuval Kogman) <nothingmuch@woobling.org>

COPYRIGHT AND LICENCE
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.