Select Code to Download

@{$href}{map {to_new($_)} keys %$href}  # wrong
    = delete @{$href}{keys %$href};

my @newkeys = map {to_new($_)} keys %$href;
@{$href}{@newkeys} = delete @{$href}{keys %$href};