This is weird, but looks and feels somewhat cool :) And to all commenters, TMTOWTDI, btw.

On to the code. There's no need to do multiplications to negate a number.

@a = map { -$_ } (-7 .. -1);
[download]