Help for this page
Select Code to Download
Select
or
download this
$index = ($index + $dir) % @array;
Select
or
download this
( $index += $dir ) %= @array;