Help for this page
for $i(0..$length2){ push @array2, $array[$i]; $i+=2; }
for ($i=0;$i<=@array-2;$i+=2) { push @array2, $array[$i]; }
for $i(1..$length){ push @array2, $array[$i]; $i+=2; }