Help for this page

Select Code to Download


  1. or download this
    shell> perl -MO=Deparse -
sub m{
...
}
/"String"/;
- syntax OK
  2. or download this
    sub replace {
  local *_=\$_[0];
...
replace("String");

Modification of a read-only value attempted at pmsopw_250834.pl line 3
+.