File Coverage

blib/lib/AnyMQ/AMQP.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             package AnyMQ::AMQP;
2              
3 1     1   22770 use strict;
  1         2  
  1         31  
4 1     1   19 use 5.008_001;
  1         3  
  1         51  
5             our $VERSION = '0.30';
6              
7             1;
8             __END__
9              
10             =encoding utf-8
11              
12             =for stopwords
13              
14             =head1 NAME
15              
16             AnyMQ::AMQP - AMQP binding for AnyMQ
17              
18             =head1 SYNOPSIS
19              
20             use AnyMQ;
21             my $bus = AnyMQ->new_with_traits(traits => ['AMQP'],
22             host => 'localhost',
23             port => 5672,
24             user => 'guest',
25             pass => 'guest',
26             vhost => '/',
27             exchange => 'foo',
28             );
29             my $client = $bus->new_listener($bus->topic("foo"));
30             $client->poll(sub { my $msg = shift;
31             # ...
32             });
33              
34             =head1 DESCRIPTION
35              
36             AnyMQ::AMQP is L<AnyMQ> trait to work with AMQP servers.
37              
38             =head1 AUTHOR
39              
40             Chia-liang Kao E<lt>clkao@clkao.orgE<gt>
41              
42             =head1 LICENSE
43              
44             This library is free software; you can redistribute it and/or modify
45             it under the same terms as Perl itself.
46              
47             =head1 SEE ALSO
48              
49             =cut