foreach $key (keys %hash) { $ref = $hash{$key};