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

$_ = ($_+1) % 10 for @a;

In Section Seekers of Perl Wisdom