Help for this page

Select Code to Download


  1. or download this
    >perl -e '
use Data::Alias;
...
$b=1;
'
Modification of a read-only value attempted at -e line 5.
  2. or download this
    > perl -e '
use Data::Alias;
...
alias my ($a, $b, $c) = @local_vars;
$b=1;
'
  3. or download this
    #!/usr/bin/perl -w

...
}

printf "len_local_varnames=%d\n",$len_local_varnames;
  4. or download this
    #!/usr/bin/perl -w

...
}

&mysub;
  5. or download this
        my @localspace = eval "local @_=($local_varnames)";