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 => 'Hash',
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; # First calling - here read file and hash of configs
sleep 2; # only 2 seconds elapsed
$prog->config; # Here no read - only attribute value returning
sleep 4; # elapsed ~ 6 seconds from first calling of builder - more than 5.5 'expires' option
$prog->config; # Here new read file and new hash of configs bacause old value has been expired
sleep 3; # only 3 seconds elapsed from rebuilding
$prog->config; # Here no read - only attribute value returning
...
and even by this way:
package MyRole;
use Moose::Role;
use MooseX::ExpiredAttribute;
has 'config' => (
traits => [ qw( Expired ) ],
is => 'rw',
isa => 'Hash',
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 allow to create expired attributes with auto-rebuilding
feature after elapsed time. 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 trait to attribute and to add 'expires' option (in 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 <
[email protected]>
LICENSE
This module is free software and is published under the same terms as
Perl itself.
