my @foo = qw/1 2 3 4 5 6/;
my @bar = splice @foo, 1,2;
print "Indexes 1 & 2 are @bar\n";