$x = \$y; $y = *_; print $x; $y = 5; print $x;