|----DECIMAL --| |------BINARY-------| ADDRESS VALUE ADDRESS VALUE ======= ===== ======= ========= 0 2 00 0000 0010 1 7 01 0000 0111 2 3 10 0000 0011 3 42 11 0010 1010 #### $foo = 88; #### $3 = 42; 3 = 42; #### $3 = 42; $2 = \$3; #### print $$2; #### my $A ; my $B ; my $C = 42; $A = \$B; $B = \$C; say '$A:'; Dump( $A ); say '$B:'; Dump( $B ); say '$C:'; Dump( $C ); __END__ Output: $A: SV = RV(0x8a060b4) at 0x8a060a8 REFCNT = 1 FLAGS = (PADMY,ROK) RV = 0x8bc9a38 SV = RV(0x8bc9a44) at 0x8bc9a38 REFCNT = 2 FLAGS = (PADMY,ROK) RV = 0x8bc9a48 SV = IV(0x8bc9a44) at 0x8bc9a48 REFCNT = 2 FLAGS = (PADMY,IOK,pIOK) IV = 42 $B: SV = RV(0x8bc9a44) at 0x8bc9a38 REFCNT = 2 FLAGS = (PADMY,ROK) RV = 0x8bc9a48 SV = IV(0x8bc9a44) at 0x8bc9a48 REFCNT = 2 FLAGS = (PADMY,IOK,pIOK) IV = 42 $C: SV = IV(0x8bc9a44) at 0x8bc9a48 REFCNT = 2 FLAGS = (PADMY,IOK,pIOK) IV = 42