$|=1; # So it works in the Open Perl IDE

$first = 1;
$second = 2;

$temp = $first; # make a backup copy of the first scalar
$first = $second; # Now the original $first is lost!
$second = $temp; # luckily we have a backup

print "$first $second";


