Select Code to Download

Select or download this
```
5.13.4+
5.14.0+
```

perl -E"$x=x; $x x= 100e6; <>; $r = \substr $x, 50e6; <>; ord $$r; <>"

AP 5.12.4 32-bit           99M                       148M         148M
AP 5.14.0 32-bit           99M                        99M         148M
AP 5.14.2 32-bit           99M                        99M         148M

Select or download this

>\progs\perl5142-ap1402\bin\perl -MDevel::Peek -E"$x=chr(0); $x x= 100
+; Dump substr $x, 50;"
SV = PVLV(0x4de51c) at 0x497b04
...
    PV = 0x4b36cc "\0\0\0...\0\0\0"\0
    CUR = 100
    LEN = 104

Select or download this

>\progs\perl5124-ap1205\bin\perl -MDevel::Peek -E"$x=chr(0); $x x= 100
+; Dump substr $x, 50;"
SV = PVLV(0x319e4c) at 0x3bf54
...
    PV = 0x330f6c "\0\0\0...\0\0\0"\0
    CUR = 100
    LEN = 104