File Coverage

blib/lib/Data/Pipeline/Iterator/Output.pm
Criterion Covered Total %
statement 1 3 33.3
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 2 4 50.0


line stmt bran cond sub pod time code
1             package Data::Pipeline::Iterator::Output;
2              
3 1     1   7771 use Moose;
  0            
  0            
4              
5             use Data::Pipeline::Types qw( Iterator Adapter );
6             use Data::Pipeline::Machine;
7              
8             has iterator => (
9             is => 'ro',
10             isa => Iterator,
11             required => 1
12             );
13              
14             has serializer => (
15             is => 'ro',
16             isa => Adapter,
17             required => 1
18             );
19              
20             sub to {
21             my($self, $target, @options) = @_;
22              
23             $self -> serializer -> serialize( $self -> iterator, $target );
24             }
25              
26             1;
27              
28             __END__