in reply to Implementing a cyclic array

Use the % operator.

In Section Seekers of Perl Wisdom