local() magic with hash entry?

saintmike has asked for the wisdom of the Perl Monks concerning the following question:

Is there a way to make a hash entry go away after leaving the current dynamic scope? Similar to

    sub func {
        local($foo);
        $foo = "bar";
    }
[download]

where $foo goes back to normal after leaving func(), I'd like to have something like

    sub func {
        my($self) = @_;

        $self->{foo} = "bar";
    }
[download]

only that $self->{foo} should go back to the original value automatically after func() ends.

Ideas, anyone?

Comment on local() magic with hash entry? Select or Download Code

Replies are listed 'Best First'.
Re: local() magic with hash entry? by diotalevi (Canon) on Jul 07, 2006 at 23:26 UTC
`local $self->{foo} = 'bar';` Next time read your documentation first. ⠤⠤ ⠙⠊⠕⠞⠁⠇⠑⠧⠊	[reply] [d/l]
Re^2: local() magic with hash entry? by saintmike (Vicar) on Jul 07, 2006 at 23:42 UTC
D'oh! Thx diotalevi, perlsub indeed explains it.	[reply]
Re^2: local() magic with hash entry? by tinita (Parson) on Jul 09, 2006 at 13:00 UTC
`local $self->{foo} = 'bar';` i have been programming Perl for more than seven years now, but until today i didn't know that you can localize hash elements, if the hash itself is a lexical variable. nice =)	[reply] [d/l]
Re^3: local() magic with hash entry? by Hue-Bond (Priest) on Jul 09, 2006 at 13:09 UTC
Not just lexicals: `our %hash=(0..5); { local $hash{2}=4; print "in: 2 => ", $hash{2}, "\n"; } print "out: 2 => ", $hash{2}, "\n"; __END__ in: 2 => 4 out: 2 => 3` [download] -- David Serrano	[reply] [d/l]