$newhash{$key}= delete $oldhash{$key};
#or
@newhash{@keys}= delete @oldhash{@keys};