Readonly my %CHINESE_WORDS => 
    (  perl => 'Ти+п АКБ:',
       monk => 'Ти+п АКБ:'
    );
Readonly my %PROTEINS => 
    ( A => 'Ти+п АКБ:',
      C => 'Ти+п АКБ:',
      G => 'Ти+п АКБ:',
      T => 'Ти+п АКБ:',
    );