If it would be a string of $n occurances of $x, I would simply write $x x $n. Can I do something similarily simple for lists?

@list = ($elem) x $count;
[download]