Tie::CountLoop

Tie::CountLoop is a Perl module that helps you have a counter looping in a scalar with min max and increment value.
Download

Tie::CountLoop Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Dulaunoy Fabrice
  • Publisher web site:
  • http://search.cpan.org/~fdulau/Tie-CountLoop-1.5/lib/Tie/CountLoop.pm

Tie::CountLoop Tags


Tie::CountLoop Description

Tie::CountLoop is a Perl module that helps you have a counter looping in a scalar with min max and increment value. Tie::CountLoop is a Perl module that helps you have a counter looping in a scalar with min max and increment value.SYNOPSIS use Tie::CountLoop; tie my $counter , 'Tie::CountLoop',15 ,-1 ,15 ,7 ,0; my $t = tied $counter; $t->increment( 1 ); for ( 1 .. 20 ) { print " n"; } $t->increment( 0 ); for ( 1 .. 20 ) { print " n"; } or use Tie::CountLoop; tie my $counter , 'Tie::CountLoop'; for ( 1 .. 20 ) { print " n"; }Tie::CountLoop allows you to tie a scalar in such a way that it increments each time it is used. The tie takes 4 optionals extra arguments.Argument 1: is the start value of the counter. (default =0).Argument 2: is the increment value. (default = 1).Argument 3: is the maximal value. When this value is reached, the counter is set to the minimal value (default = (2**32) -1)Argument 4: is the minimal value. When this value is reached if we used an negative increment value, the counter is set to the maximal value (default = 0)Argument 5: is a skipping value. If set to 3, means that you could access the counter 3 time without incrementing (defualt=1) Requirements: · Perl


Tie::CountLoop Related Software