eval "\$text =~ y/a-z/$crypted/";