my %newhash = ();

for (@mips) {
   $newhash{$_} = $hash{$_} || 999;
}

%hash = %newhash;