Alternatively, yet still using the idea of discarding part of the output:

my(undef, undef, @rest) = split/\n/;
[download]

But, with a variable value for $index, I'd rather go the splice route.