Help for this page

Select Code to Download


  1. or download this
    # test.pl

...
Dump $s;

system $^X, '-wle', "print unpack('H*', $s);";
  2. or download this
    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.
  3. or download this
    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.
  4. or download this
    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.
  5. or download this
    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.