for $i(1..$length){ push @array2, $array[$i]; $i+=2; }