perl -Mstrict -we'my $x = 8; my $xr = \$x; print $$xr, "n";'