NAME
MooseX::ExpiredAttribute - Expired and auto rebuilded attributes in
Moose objects
SYNOPSIS
package MyClass;
use Moose;
use MooseX::ExpiredAttribute;
has 'config' => (
traits => [ qw( Expired ) ],
is => 'rw',
isa => 'HashRef',
expires => 5.5,
lazy => 1,
builder => '_build_config',
);
sub _build_config {
... # open config file, read and hash forming
}
package main;
my $prog = MyClass->new;
$prog->config; # The first calling - here read file and make hash of configs
sleep 2; # only 2 seconds elapsed...
$prog->config; # ... there is no calling of builder again - only attribute value returning
sleep 4; # elapsed ~ 6 seconds from first calling of builder - more than 5.5 seconds elapsed (the 'expires' option)
$prog->config; # ... there is new calling of builder - rereading config file again
sleep 3; # only 3 seconds elapsed from rebuilding...
$prog->config; # ... only old value is returned
...
and even by this way:
package MyRole;
use Moose::Role;
use MooseX::ExpiredAttribute;
has 'config' => (
traits => [ qw( Expired ) ],
is => 'rw',
isa => 'HashRef',
expires => 5.5,
lazy => 1,
builder => '_build_config',
);
sub _build_config {
... # open config file, read and hash forming
}
package MyClass;
with 'MyRole';
has 'foo' => ( is => 'rw' );
package main;
my $prog = MyClass->new;
$prog->config; # First calling - here read file and hash of configs
...
DESCRIPTION
This module allows to create expired attributes with auto-rebuilding
feature after elapsed time. The goal of module is attrubutes which can
be able to have the time-varying value. For example some configs can be
changed by user during program runtime and wished to be reread by
program every one minute for example. All that is required from you to
add the trait to an attribute and to add the 'expires' option (may be
fractal seconds). An attribute should have a builder too!
SEE ALSO
MooseX::ExpiredAttribute::Role::Object
MooseX::ExpiredAttribute::Role::Meta::Attribute
AUTHOR
This module has been written by Perlover <perlover@perlover.com>
LICENSE
This module is free software and is published under the same terms as
Perl itself.