my $x = 5; my $y = 2;
($x, $y) = ($y, $x);
print ("$x $y\n");