/usr/share/perl5/Message/Passing/AMQP.pm is in libmessage-passing-amqp-perl 0.003-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 | package Message::Passing::AMQP;
use Moose ();
use namespace::autoclean;
our $VERSION = "0.003";
$VERSION = eval $VERSION;
1;
=head1 NAME
Message::Passing::AMQP - input and output message-pass messages via AMQP.
=head1 SYNOPSIS
# Terminal 1:
$ message-pass --input STDIN --output AMQP --output_options '{"exchange_name":"test","hostname":"127.0.0.1","username":"guest","password":"guest"}'
{"data":{"some":"data"},"@metadata":"value"}
# Terminal 2:
$ message-pass --output STDOUT --input AMQP --input_options '{"queue_name":"test","exchange_name":"test","hostname":"127.0.0.1","username":"guest","password":"guest"}'
{"data":{"some":"data"},"@metadata":"value"}
=head1 DESCRIPTION
An AMQP adaptor for L<Message::Passing> for speaking to AMQP servers, for example L<RabbitMQ|http://www.rabbitmq.com/> or QPID.
=head1 PROTOCOL VERSION
This adaptor uses the 0.8 version of the AMQP protocol, as currently shipped with L<AnyEvent::RabbitMQ>.
=head1 SEE ALSO
=over
=item L<Message::Passing::Output::AMQP>
=item L<Message::Passing::Input::AMQP>
=item L<Message::Passing>
=item L<AnyEvent::RabbitMQ>
=back
=head1 AUTHOR
Tomas (t0m) Doran <bobtfish@bobtfish.net>
=head1 COPYRIGHT
Copyright The above mentioned AUTHOR 2012.
=head1 LICENSE
GNU Affero General Public License, Version 3
If you feel this is too restrictive to be able to use this software,
please talk to us as we'd be willing to consider re-licensing under
less restrictive terms.
=cut
1;
|