( $index += $dir ) %= @array;