Help for this page

Select Code to Download


  1. or download this
    c:\test>perl -wle"$#a = 10; print \$_ for @a"
SCALAR(0x225138)
...
SCALAR(0x225100) '8'
SCALAR(0x182bf28) '9'
SCALAR(0x182bf34) '10'
  2. or download this
    c:\test>perl -wle"BEGIN{ $#a = 10; print \$_ for @a }"
SCALAR(0x182c120)
...
SCALAR(0x182c174)
SCALAR(0x182c180)
SCALAR(0x182c18c)