#*** Setting...: $x=$hIn->{string} #*** $x = $hIn->{number}; SV = PVIV(0x8150b10) at 0x814f624 REFCNT = 1 FLAGS = (PADBUSY,PADMY,IOK,pIOK) IV = 5 PV = 0x81902e8 "abc"\0 CUR = 3 LEN = 4 #*** print "<$x>\n" <5> SV = PVIV(0x8150b10) at 0x814f624 REFCNT = 1 FLAGS = (PADBUSY,PADMY,IOK,POK,pIOK,pPOK) IV = 5 PV = 0x81902e8 "5"\0 CUR = 1 LEN = 4 #*** Resetting...: $x=$hIn->{string} #*** $x = $hIn->{number}; SV = PVIV(0x8150b10) at 0x814f624 REFCNT = 1 FLAGS = (PADBUSY,PADMY,IOK,pIOK) IV = 5 PV = 0x81902e8 "abc"\0 CUR = 3 LEN = 4 #*** "$x = $hIn->{number};" SV = PVIV(0x8150b10) at 0x814f624 REFCNT = 1 FLAGS = (PADBUSY,PADMY,POK,pPOK) IV = 5 PV = 0x81902e8 "5"\0 CUR = 1 LEN = 4