リストを利用して変数の中身を入れ替える

Perl では二つの変数 $x, $y があったとき

($x, $y) = ($y, $x);

と書くだけで変数の中身を入れ替えることができる。