Data::Perl::Role::Counter − Wrapping class for a simple numeric counter.
version 0.002011
use Data::Perl
qw/counter/;
my $c = counter(4);
$c−>inc; # $c == 5
$c−>reset; # $c == 0
This class provides a wrapper and methods for a simple numeric counter.
new($value)
Constructs a new Data::Perl::Collection::Counter object initialized with the passed in value, and returns it.
set($value)
Sets the counter to the specified value and returns the new value.
This method requires a single argument.
|
inc |
inc($arg)
Increases the attribute value by the amount of the argument, or by 1 if no argument is given. This method returns the new value.
This method accepts a single argument.
|
dec |
dec($arg)
Decreases the attribute value by the amount of the argument, or by 1 if no argument is given. This method returns the new value.
This method accepts a single argument.
reset
Resets the value stored in this slot to its default value, and returns the new value.
|
• |
Data::Perl |
|||
|
• |
MooX::HandlesVia |
Matthew Phillips <mattp@cpan.org>
This software is copyright (c) 2020 by Matthew Phillips <mattp@cpan.org>.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.