Re: Re: •Re: Re: •Re: sub and anonymous sub

[thelenm]

in reply to Re: •Re: Re: •Re: sub and anonymous sub
in thread sub and anonymous sub

Since local works with variables in the symbol table and lexical (my) variables have no symbol table entries, you can't use local on a my variable. For example, this fails:

perl -e 'my $foo; local $foo'

with the error:

Can't localize lexical variable $foo at -e line 1.

-- Mike

--
just,my${.02}

[dmmiller2k]

Hmmm, I seem to recall localizing a hash value within a deeply nested structure, like:

my $root = { some_object => obj };
$root->{some_object} = new Object;
my $arrayref = $root->{some_object}->objectMethodReturningEmbeddedArra
+yref();
$arrayref->[0] = 5;
{
  local $arrayref->[0] = 0;
  # execute some code, which sees 0 not 5
}

# now array element is 5 again

I specifically remember wanting to do something like that in 5.004 and not being able to, having instead to do something like this:

# ...
$arrayref->[0] = 5;
# ...
{
  my $lcl = $arrayref->[0];
  $arrayref->[0] = 0;

  # execute some code, which sees 0 not 5

  $arrayref->[0] = $lcl;
}

# now array element is 5 again

dmm