File Coverage

blib/lib/Net/PulseMeter/Sensor/Timelined/HashedCounter.pm

Criterion	Covered	Total	%
statement	13	13	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod	0	1	0.0
total	17	18	94.4

package Net::PulseMeter::Sensor::Timelined::HashedCounter;
use strict;
use warnings 'all';

use base qw/Net::PulseMeter::Sensor::Timeline/;

sub aggregate_event {
    my ($self, $key, $data) = @_;
    for (keys(%$data)) {
        $self->r->hincrby($key, $_, $data->{$_});
        $self->r->hincrby($key, "total", $data->{$_});
    }
}

1;