Lines Matching refs:key
44 my $key = $1;
46 $newhash{$key} = $value;
58 my $key;
60 foreach $key (keys %{$hashref})
62 my $value = $hashref->{$key};
63 my $input = "$key = $value\n";
268 foreach $key (keys %{$olditemhashref})
270 my $value = $olditemhashref->{$key};
271 $newitemhashref->{$key} = $value;
316 while (my ($key, $value) = each %$oldhash)
318 $newhash{$key} = $value;
354 my $key;
356 foreach $key (keys %{$hashref})
358 $newhash{$key} = $hashref->{$key};
378 foreach my $key ( keys %{$hashref2} ) { $commonhash{$key} = $hashref2->{$key}; }
380 foreach my $key ( keys %{$hashref1} ) { $commonhash{$key} = $hashref1->{$key}; }
383 foreach my $key ( keys %commonhash ) { push(@newarray, "$key $commonhash{$key}\n"); }