# localize
local $a= 42;
# works like:
my $saved= $a;
$a= undef;
$a= 42;

# restore
# works like
$a= $saved;