$data =~ tr/eEtTlLiIaAbBgGoO/3377111144889900/;