Select Code to Download

my %hash = (
    '1' =>  'one',
...
@new{ values %hash } = keys %hash;

print Dumper( \%new );