for ( @data[ $i * $#data .. ( $i * $#data ) ] ) {