davido, answered your question. but here is another way to do it (TIMTOWTDI and all that).

What I want to do is put n items in @left and the remaining items in @right.

my (@right, @left);
(@left[0 .. $n - 1], @right) = @$self;
[download]

-enlil