File Coverage

blib/lib/Data/Range/Compare/Stream/Iterator/Consolidate/FileAsc.pm
Criterion Covered Total %
statement 21 21 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 1 1 100.0
total 29 29 100.0


line stmt bran cond sub pod time code
1             package Data::Range::Compare::Stream::Iterator::Consolidate::FileAsc;
2              
3 1     1   36493 use strict;
  1         3  
  1         29  
4 1     1   5 use warnings;
  1         2  
  1         36  
5 1     1   7 use base qw(Data::Range::Compare::Stream::Iterator::File);
  1         2  
  1         640  
6 1     1   8 use Data::Range::Compare::Stream;
  1         2  
  1         55  
7 1     1   854 use Data::Range::Compare::Stream::Iterator::Consolidate::Result;
  1         2  
  1         29  
8              
9 1     1   5 use constant RESULT_FROM=>'Data::Range::Compare::Stream::Iterator::Consolidate::Result';
  1         1  
  1         92  
10              
11             sub get_next {
12 4     4 1 6 my ($self)=@_;
13 4         21 my $range=$self->SUPER::get_next;
14              
15 4         30 return $self->RESULT_FROM->new($range,$range,$range);
16             }
17              
18             1;