If I understand your question correctly:

use strict;
use warnings;
my @OldArray=(0..50);

my @NewArray;
@NewArray[1..25] = @OldArray[1..25];
[download]