diff options
| -rw-r--r-- | lib/Smokeping/matchers/Median.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/Smokeping/matchers/Median.pm b/lib/Smokeping/matchers/Median.pm index 65d71e2..7dbad43 100644 --- a/lib/Smokeping/matchers/Median.pm +++ b/lib/Smokeping/matchers/Median.pm @@ -56,6 +56,18 @@ use vars qw($VERSION); $VERSION = 1.0; use Carp; +sub new(@) +{ + my $class = shift; + my $rules = { + old=>'\d+', + new=>'\d+', + diff=>'\d+(\.\d+)?' }; + + my $self = $class->SUPER::new($rules,@_); + return $self; +} + # how many values does the matcher need to do it's magic sub Length($) { |