pulse-meter 0.2.3 → 0.2.5

data/examples/basic.ru

@@ -137,7 +137,6 @@ layout = PulseMeter::Visualizer.draw do |l|
     })
   end
 
-  l.use_utc true
   l.gchart_options({
     height: 300
   })

data/lib/pulse-meter/mixins/cmd.rb

@@ -15,7 +15,9 @@ module Enumerable
         self.each {|row| csv << row.convert_time}
       end
     else
-      self.each_with_object(Terminal::Table.new) {|row, table| table << row}
+      self.each_with_object(Terminal::Table.new) do |row, table|
+        table << row.map(&:to_s)
+      end
     end
   end
 end

data/lib/pulse-meter/sensor/base.rb

@@ -49,10 +49,13 @@ module PulseMeter
         cleanup_dump
       end
   
-      # @abstract Processes event
+      # Processes event
       # @param value [Object] value produced by some kind of event
       def event(value)
-        # do nothing here
+        process_event(value)
+        true
+      rescue StandardError
+        false
       end
 
       protected
@@ -70,6 +73,12 @@ module PulseMeter
         end
       end
 
+      private
+
+      def process_event(value)
+        # do nothing here
+      end
+
     end
   end
 end

data/lib/pulse-meter/sensor/counter.rb

@@ -14,12 +14,6 @@ module PulseMeter
         event(1)
       end
 
-      # Processes event by incremnting counter by given value
-      # @param value [Fixnum] increment
-      def event(value)
-        redis.incrby(value_key, value.to_i)
-      end
-
       # Gets counter value
       # @return [Fixnum]
       def value
@@ -31,6 +25,15 @@ module PulseMeter
       def value_key
         @value_key ||= "pulse_meter:value:#{name}"
       end
+
+      private
+
+      # Processes event by incremnting counter by given value
+      # @param value [Fixnum] increment
+      def process_event(value)
+        redis.incrby(value_key, value.to_i)
+      end
+
     end
   end
 end

data/lib/pulse-meter/sensor/hashed_counter.rb

@@ -11,13 +11,6 @@ module PulseMeter
         event({key => 1})
       end
 
-      # Processes events for multiple keys
-      # @param data [Hash] hash where keys represent counter keys
-      #   and values are increments for their keys
-      def event(data)
-        data.each_pair {|k, v| redis.hincrby(value_key, k, v.to_i)}
-      end
-
       # Returs data stored in counter
       # @return [Hash]
       def value
@@ -26,6 +19,15 @@ module PulseMeter
           inject(Hash.new(0)) {|h, (k, v)| h[k] = v.to_i; h}
       end
 
+      private
+
+      # Processes events for multiple keys
+      # @param data [Hash] hash where keys represent counter keys
+      #   and values are increments for their keys
+      def process_event(data)
+        data.each_pair {|k, v| redis.hincrby(value_key, k, v.to_i)}
+      end
+
     end
   end
 end

data/lib/pulse-meter/sensor/hashed_indicator.rb

@@ -3,12 +3,6 @@ module PulseMeter
     # Static hashed indicator. In fact is is just a named hash with float value
     class HashedIndicator < Indicator
 
-      # Sets indicator values
-      # @param value [Hash] new indicator values
-      def event(events)
-        events.each_pair {|name, value| redis.hset(value_key, name, value.to_f)}
-      end
-
       # Get indicator values
       # @return [Fixnum] indicator value or zero unless it was initialized
       def value
@@ -17,6 +11,14 @@ module PulseMeter
           inject(Hash.new(0)) {|h, (k, v)| h[k] = v.to_f; h}
       end
 
+      private
+
+      # Sets indicator values
+      # @param value [Hash] new indicator values
+      def process_event(events)
+        events.each_pair {|name, value| redis.hset(value_key, name, value.to_f)}
+      end
+
     end
   end
 end

data/lib/pulse-meter/sensor/indicator.rb

@@ -9,12 +9,6 @@ module PulseMeter
         super
       end
 
-      # Sets indicator value
-      # @param value [Float] new indicator value
-      def event(value)
-        redis.set(value_key, value.to_f)
-      end
-
       # Get indicator value
       # @return [Fixnum] indicator value or zero unless it was initialized
       def value
@@ -28,6 +22,14 @@ module PulseMeter
         @value_key ||= "pulse_meter:value:#{name}"
       end
 
+      private
+
+      # Sets indicator value
+      # @param value [Float] new indicator value
+      def process_event(value)
+        redis.set(value_key, value.to_f)
+      end
+
     end
   end
 end

data/lib/pulse-meter/sensor/timeline.rb

@@ -48,16 +48,6 @@ module PulseMeter
         super
       end
 
-      # Processes event
-      # @param value event value
-      def event(value = nil)
-        multi do
-          current_key = current_raw_data_key
-          aggregate_event(current_key, value)
-          redis.expire(current_key, raw_data_ttl)
-        end
-      end
-
       # Processes event from the past
       # @param time [Time] event time
       # @param value event value
@@ -132,17 +122,13 @@ module PulseMeter
           keys << data_key(current_interval_id)
           current_interval_id += actual_interval
         end
-        values = if keys.empty?
-          []
-        else
-          redis.mget(*keys)
-        end
+        values = keys.empty? ? [] : redis.mget(*keys)
         res = []
         ids.zip(values) do |(id, val)|
           res << if val.nil?
             get_raw_value(id)
           else
-            SensorData.new(Time.at(id), val)
+            sensor_data(id, val)
           end
         end
         res
@@ -167,8 +153,11 @@ module PulseMeter
       # @return [SensorData]
       def get_raw_value(interval_id)
         interval_raw_data_key = raw_data_key(interval_id)
-        return SensorData.new(Time.at(interval_id), summarize(interval_raw_data_key)) if redis.exists(interval_raw_data_key)
-        SensorData.new(Time.at(interval_id), nil)
+        if redis.exists(interval_raw_data_key)
+          sensor_data(interval_id, summarize(interval_raw_data_key))
+        else
+          sensor_data(interval_id, nil)
+        end
       end
 
       # Drops sensor data within given time
@@ -236,6 +225,36 @@ module PulseMeter
         redis.get(key)
       end
 
+      # @abstract Deflates data taken from redis as string preserving nil values
+      # @param value [String] raw data
+      def deflate_safe(value)
+        value.nil? ? nil : deflate(value)
+      rescue
+        nil
+      end
+
+      private
+
+      def deflate(value)
+        # simple
+        value
+      end
+
+      def sensor_data(interval_id, value)
+        value = deflate(value) unless value.nil?
+        SensorData.new(Time.at(interval_id), value)
+      end
+
+      # Processes event
+      # @param value event value
+      def process_event(value = nil)
+        multi do
+          current_key = current_raw_data_key
+          aggregate_event(current_key, value)
+          redis.expire(current_key, raw_data_ttl)
+        end
+      end
+
     end
   end
 end

data/lib/pulse-meter/sensor/timelined/average.rb

@@ -19,6 +19,12 @@ module PulseMeter
           end
         end
 
+        private
+
+        def deflate(value)
+          value.to_f
+        end
+
       end
     end
   end

data/lib/pulse-meter/sensor/timelined/counter.rb

@@ -8,8 +8,15 @@ module PulseMeter
         end
 
         def summarize(key)
-          redis.get(key).to_i
+          redis.get(key)
         end
+
+        private
+
+        def deflate(value)
+          value.to_i
+        end
+
       end
     end
   end

data/lib/pulse-meter/sensor/timelined/hashed_counter.rb

@@ -16,6 +16,12 @@ module PulseMeter
             inject({}) {|h, (k, v)| h[k] = v.to_i; h}.
             to_json
         end
+
+        private
+
+        def deflate(value)
+          JSON.parse(value)
+        end
       end
     end
   end

data/lib/pulse-meter/sensor/timelined/max.rb

@@ -13,12 +13,18 @@ module PulseMeter
           count = redis.zcard(key)
           if count > 0
             max_el = redis.zrange(key, -1, -1)[0]
-            redis.zscore(key, max_el).to_f
+            redis.zscore(key, max_el)
           else
             nil
           end
         end
 
+        private
+        
+        def deflate(value)
+          value.to_f
+        end
+
       end
     end
   end

data/lib/pulse-meter/sensor/timelined/min.rb

@@ -13,12 +13,18 @@ module PulseMeter
           count = redis.zcard(key)
           if count > 0
             min_el = redis.zrange(key, 0, 0)[0]
-            redis.zscore(key, min_el).to_f
+            redis.zscore(key, min_el)
           else
             nil
           end
         end
 
+        private
+
+        def deflate(value)
+          value.to_f
+        end
+
       end
     end
   end

data/lib/pulse-meter/sensor/timelined/percentile.rb

@@ -19,12 +19,18 @@ module PulseMeter
           if count > 0
             position = @p_value > 0 ? (@p_value * count).round - 1 : 0
             el = redis.zrange(key, position, position)[0]
-            redis.zscore(key, el).to_f
+            redis.zscore(key, el)
           else
             nil
           end
         end
 
+        private
+        
+        def deflate(value)
+          value.to_f
+        end
+
       end
     end
   end

data/lib/pulse-meter/sensor/timelined/uniq_counter.rb

@@ -10,6 +10,12 @@ module PulseMeter
         def summarize(key)
           redis.scard(key)
         end
+
+        private
+        
+        def deflate(value)
+          value.to_i
+        end
       end
     end
   end

data/lib/pulse-meter/sensor/uniq_counter.rb

@@ -5,18 +5,20 @@ module PulseMeter
   module Sensor
     class UniqCounter < Counter
 
-      # Processes event
-      # @param name [String] value to be counted
-      def event(name)
-        redis.sadd(value_key, name)
-      end
-
       # Returs number of unique values ever sent to counter
       # @return [Fixnum]
       def value
         redis.scard(value_key)
       end
 
+      private
+
+      # Processes event
+      # @param name [String] value to be counted
+      def process_event(name)
+        redis.sadd(value_key, name)
+      end
+
     end
   end
 end

data/lib/pulse-meter/version.rb

@@ -1,3 +1,3 @@
 module PulseMeter
-  VERSION = "0.2.3"
+  VERSION = "0.2.5"
 end

data/lib/pulse-meter/visualize/public/js/application.coffee

@@ -141,7 +141,7 @@ document.startApp = ->
 		data: ->
 			data = super()
 			data.addColumn('datetime', 'Time')
-			dateOffset = @dateOffset()
+			dateOffset = @dateOffset() + @get('interval') * 1000
 			series = @get('series')
 			_.each series.titles, (t) ->
 				data.addColumn('number', t)
@@ -233,7 +233,11 @@ document.startApp = ->
 		timespan: -> @get('timespan') + @timespanInc
 
 		url: ->
-			"#{@collection.url()}/#{@get('id')}?timespan=#{@timespan()}"
+			timespan = @timespan()
+			if _.isNaN(timespan)
+				"#{@collection.url()}/#{@get('id')}"
+			else
+				"#{@collection.url()}/#{@get('id')}?timespan=#{timespan}"
 
 		time: -> (new Date()).getTime()
 

data/lib/pulse-meter/visualize/public/js/application.js

@@ -188,7 +188,7 @@
         var data, dateOffset, series;
         data = TimelinePresenter.__super__.data.call(this);
         data.addColumn('datetime', 'Time');
-        dateOffset = this.dateOffset();
+        dateOffset = this.dateOffset() + this.get('interval') * 1000;
         series = this.get('series');
         _.each(series.titles, function(t) {
           return data.addColumn('number', t);
@@ -351,7 +351,13 @@
         return this.get('timespan') + this.timespanInc;
       },
       url: function() {
-        return "" + (this.collection.url()) + "/" + (this.get('id')) + "?timespan=" + (this.timespan());
+        var timespan;
+        timespan = this.timespan();
+        if (_.isNaN(timespan)) {
+          return "" + (this.collection.url()) + "/" + (this.get('id'));
+        } else {
+          return "" + (this.collection.url()) + "/" + (this.get('id')) + "?timespan=" + timespan;
+        }
       },
       time: function() {
         return (new Date()).getTime();

data/spec/pulse_meter/sensor/base_spec.rb

@@ -89,8 +89,17 @@ describe PulseMeter::Sensor::Base do
   end
 
   describe "#event" do
-    it "should actually do nothing for base sensor" do
-      sensor.event(nil)
+    context "when everything is ok" do
+      it "should do nothing and return true" do
+        sensor.event(nil).should be_true
+      end
+    end
+
+    context "when an error occures while processing event" do
+      it "should catch StandardErrors and return false" do
+        sensor.stub(:process_event) {raise StandardError}
+        sensor.event(nil).should be_false
+      end
     end
   end
 

data/spec/pulse_meter/sensor/timeline_spec.rb

@@ -55,4 +55,34 @@ describe PulseMeter::Sensor::Timeline do
     end
 
   end
+
+  describe "#deflate_safe" do
+    class GoodSubclass < described_class
+      def deflate(value)
+        value.to_i
+      end
+    end
+
+    class BadSubclass < described_class
+      def deflate(value)
+        raise "Any conversion error"
+      end
+    end
+
+    let!(:good_instance) { GoodSubclass.new("good", good_init_values) }
+    let!(:bad_instance) { BadSubclass.new("bad", good_init_values) }
+
+    it "preserves nil values" do
+      good_instance.deflate_safe(nil).should be_nil
+    end
+
+    it "converts value as defined in subclass" do
+      good_instance.deflate_safe("10").should == 10
+    end
+
+    it "returns nil if conversion fails" do
+      bad_instance.deflate_safe(:foo).should be_nil
+    end
+  end
+
 end

data/spec/shared_examples/timeline_sensor.rb

@@ -78,6 +78,15 @@ shared_examples_for "timeline sensor" do |extra_init_values, default_event|
         end
       }.to change{ redis.ttl(@raw_data_key) }
     end
+
+    it "returns true if event processed correctly" do
+      sensor.event(sample_event).should be_true
+    end
+
+    it "catches StandardErrors and returns false" do
+      sensor.stub(:aggregate_event) {raise StandardError}
+      sensor.event(sample_event).should be_false
+    end
   end
 
   describe "#event_at" do
@@ -343,7 +352,7 @@ shared_examples_for "timeline sensor" do |extra_init_values, default_event|
   describe "SensorData value for an interval" do
     def check_sensor_data(sensor, value)
       data = sensor.timeline(2).first
-      data.value.should == value
+      data.value.should be_generally_equal(sensor.deflate_safe(value))
       data.start_time.to_i.should == @interval_id
     end
 

data/spec/shared_examples/timelined_subclass.rb

@@ -16,7 +16,7 @@ shared_examples_for "timelined subclass" do |events, result, extra_options|
     end
     Timecop.freeze(start_of_interval + interval) do
       data = sensor.timeline(interval + epsilon).first
-      data.value.should be_generally_equal(result)
+      data.value.should be_generally_equal(sensor.deflate_safe(result))
     end
   end
 

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: pulse-meter
 version: !ruby/object:Gem::Version
-  version: 0.2.3
+  version: 0.2.5
   prerelease: 
 platform: ruby
 authors:
@@ -10,7 +10,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-07-04 00:00:00.000000000 Z
+date: 2012-07-19 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: gon-sinatra
@@ -402,20 +402,6 @@ files:
 - lib/pulse-meter/visualize/widgets/pie.rb
 - lib/pulse-meter/visualize/widgets/timeline.rb
 - lib/pulse-meter/visualizer.rb
-- perl/PulseMeter/Sensor/Base.pm
-- perl/PulseMeter/Sensor/Counter.pm
-- perl/PulseMeter/Sensor/HashedIndicator.pm
-- perl/PulseMeter/Sensor/Indicator.pm
-- perl/PulseMeter/Sensor/Timeline.pm
-- perl/PulseMeter/Sensor/Timelined/Average.pm
-- perl/PulseMeter/Sensor/Timelined/Counter.pm
-- perl/PulseMeter/Sensor/Timelined/HashedCounter.pm
-- perl/PulseMeter/Sensor/Timelined/Max.pm
-- perl/PulseMeter/Sensor/Timelined/Median.pm
-- perl/PulseMeter/Sensor/Timelined/Min.pm
-- perl/PulseMeter/Sensor/Timelined/Percentile.pm
-- perl/PulseMeter/Sensor/Timelined/UniqCounter.pm
-- perl/PulseMeter/Sensor/UniqCounter.pm
 - pulse-meter.gemspec
 - spec/pulse_meter/mixins/dumper_spec.rb
 - spec/pulse_meter/mixins/utils_spec.rb
@@ -480,9 +466,6 @@ required_rubygems_version: !ruby/object:Gem::Requirement
   - - ! '>='
     - !ruby/object:Gem::Version
       version: '0'
-      segments:
-      - 0
-      hash: -1244879308775683986
 requirements: []
 rubyforge_project: 
 rubygems_version: 1.8.24

data/perl/PulseMeter/Sensor/Base.pm

@@ -1,42 +0,0 @@
-package PulseMeter::Sensor::Base;
-use strict;
-use warnings 'all';
-
-use base qw/Exporter/;
-use Data::Dumper;
-use Redis;
-
-use constant REDIS_DEFAULTS => {
-    host => 'localhost',
-    port => 6379,
-    db => 0
-};
-
-sub new {
-    my $class = shift;
-    my $self = {};
-    bless($self, $class);
-    $self->init(@_);
-    return $self;
-}
-
-sub init {
-    my $self = shift;
-    my $name = shift;
-    my $opts = {@_};
-
-    my $redis_options = $opts->{redis} || {};
-    $redis_options->{$_} ||= REDIS_DEFAULTS->{$_} for qw/host port db/;
-    my $redis = Redis->new(
-         server => sprintf("%s:%s", $redis_options->{host}, $redis_options->{port})
-    );
-    $redis->select($redis_options->{db});
-    $self->{redis} = $redis;
-
-    $self->{name} = $name;
-}
-
-sub r { shift->{redis} }
-sub name { shift->{name} }
-
-1;

data/perl/PulseMeter/Sensor/Counter.pm

@@ -1,19 +0,0 @@
-package PulseMeter::Sensor::Counter;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Base/;
-
-sub event {
-    my ($self, $value) = @_;
-    $self->r->incrby($self->value_key, $value);
-}
-
-sub incr { shift->event(1) }
-
-sub value_key {
-    my $self = shift;
-    sprintf("pulse_meter:value:%s", $self->name);
-}
-
-1;

data/perl/PulseMeter/Sensor/HashedIndicator.pm

@@ -1,12 +0,0 @@
-package PulseMeter::Sensor::HashedIndicator;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Indicator/;
-
-sub event {
-    my ($self, $data) = @_;
-    $self->r->hset($self->value_key, $_, $data->{$_}) for (keys %$data);
-}
-
-1;

data/perl/PulseMeter/Sensor/Indicator.pm

@@ -1,17 +0,0 @@
-package PulseMeter::Sensor::Indicator;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Base/;
-
-sub event {
-    my ($self, $value) = @_;
-    $self->r->set($self->value_key, $value);
-}
-
-sub value_key {
-    my $self = shift;
-    sprintf("pulse_meter:value:%s", $self->name);
-}
-
-1;

data/perl/PulseMeter/Sensor/Timeline.pm

@@ -1,51 +0,0 @@
-package PulseMeter::Sensor::Timeline;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Base/;
-
-use constant DEFAULTS => {
-    raw_data_ttl => 3600,
-    interval => 60,
-};
-
-sub init {
-    my $self = shift;
-    my $name = shift;
-    $self->SUPER::init($name, @_);
-    my $opts = {@_};
-    $self->{$_} = $opts->{$_} || DEFAULTS->{$_} for qw/raw_data_ttl interval/;
-}
-
-sub raw_data_ttl { shift->{raw_data_ttl} }
-sub interval { shift->{interval} }
-
-sub event {
-    my ($self, $value) = @_;
-    $self->r->multi;
-    my $current_key = $self->current_raw_data_key;
-    $self->aggregate_event($current_key, $value);
-    $self->r->expire($current_key, $self->raw_data_ttl);
-    $self->r->exec;
-}
-
-sub raw_data_key {
-    my ($self, $id) = @_;
-    sprintf("pulse_meter:raw:%s:%s", $self->name, $id);
-}
-
-sub get_interval_id {
-    my ($self, $time) = @_;
-    int($time / $self->interval) * $self->interval;
-}
-
-sub current_interval_id { shift->get_interval_id(time) }
-
-sub current_raw_data_key {
-    my $self = shift;
-    $self->raw_data_key($self->current_interval_id);
-}
-
-sub aggregate_event { die('Abstract') }
-
-1;

data/perl/PulseMeter/Sensor/Timelined/Average.pm

@@ -1,13 +0,0 @@
-package PulseMeter::Sensor::Timelined::Average;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $value) = @_;
-    $self->r->hincrby($key, "count", 1);
-    $self->r->hincrby($key, "sum", $value);
-}
-
-1;

data/perl/PulseMeter/Sensor/Timelined/Counter.pm

@@ -1,12 +0,0 @@
-package PulseMeter::Sensor::Timelined::Counter;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $value) = @_;
-    $self->r->incrby($key, $value);
-}
-
-1;

data/perl/PulseMeter/Sensor/Timelined/HashedCounter.pm

@@ -1,12 +0,0 @@
-package PulseMeter::Sensor::Timelined::HashedCounter;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $data) = @_;
-    $self->r->hincrby($key, $_, $data->{$_}) for (keys(%$data));
-}
-
-1;

data/perl/PulseMeter/Sensor/Timelined/Max.pm

@@ -1,18 +0,0 @@
-package PulseMeter::Sensor::Timelined::Max;
-use strict;
-use warnings 'all';
-use Data::Uniqid qw/uniqid/;
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $value) = @_;
-    $self->r->zadd(
-        $key,
-        $value,
-        sprintf("%s::%s", $value, uniqid())
-    );
-    $self->r->zremrangebyrank($key, 0, -2);
-}
-
-1;

data/perl/PulseMeter/Sensor/Timelined/Median.pm

@@ -1,8 +0,0 @@
-package PulseMeter::Sensor::Timelined::Median;
-use strict;
-use warnings 'all';
-use Data::Uniqid qw/uniqid/;
-
-use base qw/PulseMeter::Sensor::Timelined::Percentile/;
-
-1;

data/perl/PulseMeter/Sensor/Timelined/Min.pm

@@ -1,18 +0,0 @@
-package PulseMeter::Sensor::Timelined::Min;
-use strict;
-use warnings 'all';
-use Data::Uniqid qw/uniqid/;
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $value) = @_;
-    $self->r->zadd(
-        $key,
-        $value,
-        sprintf("%s::%s", $value, uniqid())
-    );
-    $self->r->zremrangebyrank($key, 1, -1);
-}
-
-1;

data/perl/PulseMeter/Sensor/Timelined/Percentile.pm

@@ -1,17 +0,0 @@
-package PulseMeter::Sensor::Timelined::Percentile;
-use strict;
-use warnings 'all';
-use Data::Uniqid qw/uniqid/;
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $value) = @_;
-    $self->r->zadd(
-        $key,
-        $value,
-        sprintf("%s::%s", $value, uniqid())
-    );
-}
-
-1;

data/perl/PulseMeter/Sensor/Timelined/UniqCounter.pm

@@ -1,13 +0,0 @@
-package PulseMeter::Sensor::Timelined::UniqCounter;
-use strict;
-use warnings 'all';
-use Data::Uniqid qw/uniqid/;
-
-use base qw/PulseMeter::Sensor::Timeline/;
-
-sub aggregate_event {
-    my ($self, $key, $value) = @_;
-    $self->r->sadd($key, $value);
-}
-
-1;

data/perl/PulseMeter/Sensor/UniqCounter.pm

@@ -1,12 +0,0 @@
-package PulseMeter::Sensor::UniqCounter;
-use strict;
-use warnings 'all';
-
-use base qw/PulseMeter::Sensor::Counter/;
-
-sub event {
-    my ($self, $value) = @_;
-    $self->r->sadd($self->value_key, $value);
-}
-
-1;