package Message::Passing::Output::STDOUT; use Moo; use namespace::clean -except => 'meta'; with 'Message::Passing::Role::Output'; sub consume { my $self = shift; local $|=1; print STDOUT shift() . "\n"; } 1; =head1 NAME Message::Passing::Output::STDOUT - STDOUT output =head1 SYNOPSIS message-pass --input STDIN --output STDOUT {"foo": "bar"} {"foo":"bar"} =head1 DESCRIPTION Output messages to STDOUT =head1 METHODS =head2 consume Consumes a message by printing it, followed by \n =head1 SEE ALSO L =head1 SPONSORSHIP This module exists due to the wonderful people at Suretec Systems Ltd. who sponsored its development for its VoIP division called SureVoIP for use with the SureVoIP API - =head1 AUTHOR, COPYRIGHT AND LICENSE See L. =cut