NAME

Data::RoundRobin - Serve data in a round robin manner.

SYNOPSIS

my @array = qw(a b);
# OO Interface
my $rr = Data::RoundRobin->new(@array);

print $rr->next; # a
print $rr->next; # b
print $rr->next; # a
print $rr->next; # b
...

# Infinite Loop
while(my $elem = $rr->next) {
   ...
}

# Operator overloading
my $rr = Data::RoundRobin->new(qw(a b));
print $rr; # a
print $rr; # b
print $rr; # a

DESCRIPTION

This module provides a round roubin object implementation. It is similar to an iterator, only the internal counter is reset to the begining whenever it reaches the end. It might also be considered as a circular iterator.

METHODS

new

Constructor, a list should be given to construct a Data::RoundRobin object.

next

Retrieve next value of this instance.

numerify

Retrieve next numerifed value of this instance. Invoked by Perl's operator overloadding mechanism.

COPYRIGHT

Copyright 2006 by Kang-min Liu <gugod@gugod.org>

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See <http://www.perl.com/perl/misc/Artistic.html>