while(@array){ print @array[0 .. 20]; delete @array[0 .. 20]; }