File Coverage

blib/lib/Message/Passing/Filter/Decoder/Crypt/CBC.pm
Criterion Covered Total %
statement 9 11 81.8
branch n/a
condition n/a
subroutine 3 4 75.0
pod n/a
total 12 15 80.0


line stmt bran cond sub pod time code
1             package Message::Passing::Filter::Decoder::Crypt::CBC;
2 1     1   1395 use Moo;
  1         16120  
  1         4  
3 1     1   2886 use Compress::Zlib;
  1         83432  
  1         392  
4 1     1   1046 use namespace::clean -except => 'meta';
  1         12661  
  1         9  
5              
6             with qw/
7             Message::Passing::Role::Filter
8             Message::Passing::Role::Crypt::CBC
9             /;
10              
11             sub filter {
12 0     0     my ($self, $message) = @_;
13 0           $self->cbc->decrypt($message);
14             }
15              
16              
17             1;
18              
19             =head1 NAME
20              
21             Message::Passing::Decoder::Crypt::CBC - Use Crypt::CBC to decrypt messages
22              
23             =head1 SYNOPSIS
24              
25             message-pass --input STDIN --decoder Crypt::CBC \
26             --decoder_options '{}' \
27             --output ZeroMQ --output_options '...'
28              
29             =head1 DESCRIPTION
30              
31             Decrypts messages with Crypt::CBC.
32              
33             =head1 SEE ALSO
34              
35             =over
36              
37             =item L
38              
39             =item L
40              
41             =back
42              
43             =head1 METHODS
44              
45             =head2 filter
46              
47             Decrypts the message
48              
49             =head1 AUTHOR, COPYRIGHT & LICENSE
50              
51             See L.
52              
53             =cut