The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Message::Passing::DSL - An easy way to make chains of Message::Passing components.

SYNOPSIS

    package mylogcollectorscript;
    use Message::Passing::DSL;

    with 'MooseX::GetOpt',
        'Message::Passing::Role::Script';

    has socket_bind => (
        is => 'ro',
        isa => 'Str',
        default => 'tcp://*:5558',
    );

    sub build_chain {
        my $self = shift;
        log_chain {
            output console => (
                class => 'STDOUT',
            );
            input zmq => (
                class => 'ZeroMQ',
                output_to => 'console',
                socket_bind => $self->socket_bind,
            );
        };
    }

    __PACKAGE__->start unless caller;
    1;

DESCRIPTION

This module provides a simple to use helper system for writing scripts which implement a Message::Passing server, like the built in message-pass script.

FUNCTIONS

log_chain

Constructs a log chain (i.e. a series of log objects feeding into each other), warns about any unused parts of the chain, and returns the chain head (i.e. the input class).

Maintains a registry / factory for the log classes, which is used to allow the resolving of symbolic names in the output_to key to function.

See example in the SYNOPSIS, and details on the other functions below.

output

Constructs a named output within a chain.

    log_chain {
        output foo => ( class => 'STDOUT' );
        ....
    };

filter

Constructs a named filter (which can act as both an output and an input) within a chain.

    log_chain {
        ...
        filter bar => ( output_to => 'stdout', class => 'Null' );
        ...
    };

input

The last thing in a chain - produces data which gets consumed.

    log_chain {
        ...
        input zmq => ( output_to => 'bar', class => 'ZeroMQ', bind => '...' );
        ....
    }

run_log_server

This enters the event loop and causes log events to be consumed and processed.

Can be passed a log_chain to run, although this is entirely optional (as all log chains which are still in scope will run when the event loop is entered).

SPONSORSHIP

This module exists due to the wonderful people at Suretec Systems Ltd. <http://www.suretecsystems.com/> who sponsored its development for its VoIP division called SureVoIP <http://www.surevoip.co.uk/> for use with the SureVoIP API - <http://www.surevoip.co.uk/support/wiki/api_documentation>

AUTHOR, COPYRIGHT AND LICENSE

See Message::Passing.