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.24";
4              
5 6     6   76593 use strict;
  6         17  
  6         193  
6 6     6   38 use warnings;
  6         15  
  6         187  
7              
8 6     6   369 use App::RecordStream::Aggregator::MapReduce::Field;
  6         14  
  6         155  
9 6     6   325 use App::RecordStream::Aggregator;
  6         12  
  6         147  
10 6     6   464 use App::RecordStream::DomainLanguage::Registry;
  6         14  
  6         145  
11              
12 6     6   34 use base 'App::RecordStream::Aggregator::MapReduce::Field';
  6         15  
  6         987  
13              
14             #sub new -- passed through
15              
16             #sub new_from_valuation -- passed through
17              
18             sub reduce
19             {
20 42     42 0 103 my ($this, $cookie, $cookie2) = @_;
21              
22 42         165 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;