File Coverage

blib/lib/App/RecordStream/Aggregator/Sum.pm
Criterion Covered Total %
statement 20 22 90.9
branch n/a
condition n/a
subroutine 7 9 77.7
pod 0 3 0.0
total 27 34 79.4


line stmt bran cond sub pod time code
1             package App::RecordStream::Aggregator::Sum;
2              
3             our $VERSION = "4.0.23";
4              
5 6     6   25981 use strict;
  6         17  
  6         148  
6 6     6   29 use warnings;
  6         14  
  6         139  
7              
8 6     6   354 use App::RecordStream::Aggregator::MapReduce::Field;
  6         13  
  6         120  
9 6     6   310 use App::RecordStream::Aggregator;
  6         12  
  6         122  
10 6     6   360 use App::RecordStream::DomainLanguage::Registry;
  6         14  
  6         137  
11              
12 6     6   30 use base 'App::RecordStream::Aggregator::MapReduce::Field';
  6         11  
  6         909  
13              
14             #sub new -- passed through
15              
16             #sub new_from_valuation -- passed through
17              
18             sub reduce
19             {
20 42     42 0 93 my ($this, $cookie, $cookie2) = @_;
21              
22 42         139 return $cookie + $cookie2;
23             }
24              
25             sub long_usage
26             {
27 0     0 0   return <
28             Usage: sum,
29             Sums specified field.
30             EOF
31             }
32              
33             sub short_usage
34             {
35 0     0 0   return "sums provided field";
36             }
37              
38             App::RecordStream::Aggregator->register_implementation('sum', __PACKAGE__);
39              
40             App::RecordStream::DomainLanguage::Registry::register_vfn(__PACKAGE__, 'new_from_valuation', 'sum', 'VALUATION');
41              
42             1;