use vars '%hash'; %hash = ('a'=>0 , 'e'=>0 , 'i'=>0 , 'o'=>0 , 'u'=> 0,); ... do { local %hash = %hash; ... make some changes }; ... changes are forgotten