The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Data::Average::BoundedExpires - Bounded Data::Average With Expiry

SYNOPSIS

  use Data::Average::BoundedExpires;

  my $data = Data::Average::BoundedExpires->new(max => 10, expires_in => 120);

DESCRIPTION

Data::Average::Bounded is a mix of Data::Average::Bounded and Data::Average::Expires.

METHODS

new(max => $max, expires_in => $expires_in)

Creates a new Data::Average::BoundedExpires object

add($value)

Behaves like a combination of Data::Average::Bounded and Data::Average::Expires.

length()

avg()

Same as Data::Average.

AUTHOR

Copyright (c) 2006 Daisuke Maki <dmaki@cpan.org> All rights reserved.