http://www.perlmonks.org?node_id=1067092


in reply to A better (ie.more concise) way to write this?

@a = (1..10);

$_++, $_%=10 for @a;

[download]

In Section Seekers of Perl Wisdom