Select Code to Download

# test.pl

...
Dump $s;

system $^X, '-wle', "print unpack('H*', $s);";

C:\_32\pscrpt>perl test.pl
SV = PV(0x4bcf98) at 0x571248
...
  CUR = 18
  LEN = 20
Can't find string terminator "'" anywhere before EOF at -e line 1.

C:\_32\pscrpt>perl test.pl
SV = PV(0x3ecf98) at 0x383348
...
  CUR = 18
  LEN = 20
Can't find string terminator "'" anywhere before EOF at -e line 1.

C:\_32\pscrpt>perl test.pl
SV = PV(0x26cf98) at 0x5311f8
...
  CUR = 18
  LEN = 20
Use of uninitialized value $_ in print at -e line 1.

C:\_32\pscrpt>perl test.pl
SV = PV(0x38cf98) at 0x4c51b8
...
  CUR = 18
  LEN = 20
Can't find string terminator "'" anywhere before EOF at -e line 1.