Help for this page

Select Code to Download

Select or download this

my ($x,$y);
$x=\$y;
$y=\$x;
my $aref=[$x,$y];