for my $eng (keys %hash){
   $hash{$hash_tr_fr{$eng}}=$hash{$eng};
   delete $hash{$eng};
}