use Data::Dumper;
%reverse= reverse(%CodonMap)
print Dumper \%reverse;