sub {
        my ($key, $val, $href) = @_;
        if (exists $repl{$key}) {
            my $newkey = $repl{$key};

            $val = [$val] if ref ($val) eq "HASH";
            $href->{$newkey} = $val;
            delete $href->{$key};
        }