use strict; use MyMod; my %hash = ( usual=>'stuff',so=>'on',foo=>'bar' ); %hash = MyMod->do_stuff(%hash); #### package MyMod; use strict; sub do_stuff { shift; my %newhash=@_; #stuff return %newhash; }