...
		if (--$end > @result) {
			@result = @a[0..$end];
		}
...