Will this work?

   my %hash = { ... original data ... };
   my %tmp = map{ ( $_, exists $hash{ $_ } ? $hash{ $_ } : 999 ) } @mi
+ps;
[download]