NAME

       Data::Perl::Role::Counter - Wrapping class for a simple numeric counter.

VERSION

       version 0.002007

SYNOPSIS

         use Data::Perl qw/counter/;

         my $c = counter(4);

         $c->inc;   # $c == 5

         $c->reset; # $c == 0

DESCRIPTION

       This class provides a wrapper and methods for a simple numeric counter.

PROVIDED METHODS

       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.

SEE ALSO

       •   Data::Perl

       •   MooX::HandlesVia

AUTHOR

       Matthew Phillips <mattp@cpan.org>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2013 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.

POD ERRORS

       Hey! The above document had some coding errors, which are explained below:

       Around line 55:
           Expected text after =item, not a bullet

       Around line 61:
           Expected text after =item, not a bullet

       Around line 63:
           Expected text after =item, not a bullet

       Around line 70:
           Expected text after =item, not a bullet

       Around line 72:
           Expected text after =item, not a bullet

       Around line 79:
           Expected text after =item, not a bullet

perl v5.18.1                                       2013-05-20                     Data::Perl::Role::Counter(3pm)