Help for this page

Select Code to Download


  1. or download this
    sub subname {
  local *_=\$_[0];
...
subname("String");

Modification of a read-only value attempted at - line 3.
  2. or download this
    sub {
  print "\$_[0]: ",\$_[0], $/;
...
$_[0]: SCALAR(0x8107ec8)
$_:    SCALAR(0x8107ec8)
Modification of a read-only value attempted at - line 5.