%hash =(uno=>1, dos=>2); push @stack, \%hash; %hash=%{pop @stack};