File Coverage

blib/lib/Jubatus/Stat/Client.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             # This file is auto-generated from stat.idl(0.4.5-347-g86989a6) with jenerator version 0.4.5-532-g61b108e/develop
2             # *** DO NOT EDIT ***
3              
4             package Jubatus::Stat::Client;
5              
6 1     1   3314 use strict;
  1         2  
  1         33  
7 1     1   6 use warnings;
  1         3  
  1         24  
8 1     1   5 use utf8;
  1         2  
  1         6  
9 1     1   21 use autodie;
  1         2  
  1         7  
10 1     1   5314 use AnyEvent::MPRPC;
  1         3  
  1         90  
11              
12 1     1   6 use parent 'Jubatus::Common::Client';
  1         1  
  1         9  
13             require Jubatus::Stat::Types;
14              
15             sub push {
16             my ($self, $key, $value) = @_;
17             return $self->_call("push", Jubatus::Common::TBool->new(), [$key, $value],
18             [Jubatus::Common::TString->new(), Jubatus::Common::TFloat->new()]);
19             }
20              
21             sub sum {
22             my ($self, $key) = @_;
23             return $self->_call("sum", Jubatus::Common::TFloat->new(), [$key],
24             [Jubatus::Common::TString->new()]);
25             }
26              
27             sub stddev {
28             my ($self, $key) = @_;
29             return $self->_call("stddev", Jubatus::Common::TFloat->new(), [$key],
30             [Jubatus::Common::TString->new()]);
31             }
32              
33             sub max {
34             my ($self, $key) = @_;
35             return $self->_call("max", Jubatus::Common::TFloat->new(), [$key],
36             [Jubatus::Common::TString->new()]);
37             }
38              
39             sub min {
40             my ($self, $key) = @_;
41             return $self->_call("min", Jubatus::Common::TFloat->new(), [$key],
42             [Jubatus::Common::TString->new()]);
43             }
44              
45             sub entropy {
46             my ($self, $key) = @_;
47             return $self->_call("entropy", Jubatus::Common::TFloat->new(), [$key],
48             [Jubatus::Common::TString->new()]);
49             }
50              
51             sub moment {
52             my ($self, $key, $degree, $center) = @_;
53             return $self->_call("moment", Jubatus::Common::TFloat->new(), [$key, $degree,
54             $center], [Jubatus::Common::TString->new(), Jubatus::Common::TInt->new(1,
55             4), Jubatus::Common::TFloat->new()]);
56             }
57              
58             sub clear {
59             my ($self) = @_;
60             return $self->_call("clear", Jubatus::Common::TBool->new(), [], []);
61             }
62              
63             1;
64              
65             __END__