c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my $w = 'foo';
 my $x = \$w;
 my $y = \$x;
 my $z = \$y;
 ;;
 print $z;
 print $$z;
 print $$$z;
 print $$$$z;
 ;;
 dd $z;
"
REF(0x54c11c)
REF(0x432734)
SCALAR(0x4326f4)
foo
\\\"foo"