Help for this page

Select Code to Download


  1. or download this
    use Devel::Peek;
{ my $subRef = \substr $string, 0;
...
{ my $subRef = \(''.substr $string, 0);
  Dump($$subRef);
}
  2. or download this
    SV = PVLV(0x1834fdc) at 0x1831820
  REFCNT = 2
...
  PV = 0x183646c ""\0
  CUR = 0
  LEN = 4
  3. or download this
    my $subRef = \(''.substr $string, 0);
  4. or download this
    0.0120670795440674
0.0105710029602051
0.010854959487915
  5. or download this
    my $subRef = \scalar substr $string, 0;