$key = $replacements{$key};

##</code><code>##

foreach my $key ( sort keys %replacements ) {
	$key = $replacements{$key};
}