in reply to interchanging variables the tough way

I usually forget about list subscripting, but it's an option:

($a, $b, $c) = ($a, $b, $c)[1, 2, 0];

Ugly, eh?

In Section Seekers of Perl Wisdom