eval "\$test_crypt =~ tr/$key/$word/";   # TRANSLATE USING THIS KEY