[Belfast-pm] unshift-y bop-op-op-op, just blows me away </hair>

[Andrew Wilson]

On Thu, Dec 23, 2004 at 02:25:21PM +0000, Marc wrote:
> Yo, people.
> 
> This is annoying me. A better way please?
> 
> perl -e '@l = (1..10); do { warn join(" ", @l), "\n"; unshift @l, pop @l; } for (0 .. 10);'

perl -e 'do{for(0..10){print$i++%11," "}print"\n";$i--}for 0..10;'

But that's butt ugly, your version is more perlish.

andrew
-- 
Leo: (July 23 - Aug. 22)
Though it's noble that you became an accounts adjuster to make the
world a better place, it remains unclear exactly how that's going
to happen.