in reply to secret code, transliteration prob

You need to change the context:

my $code;
eval "(\$code = \$message) =~ tr/abcdefghijklmnopqrstuvwxyz/$string/";

[download]
# in
steve

#out
fnbrb

[download]

Replies are listed 'Best First'.
Re^2: secret code, transliteration prob
by henzcoop (Novice) on Apr 12, 2016 at 16:26 UTC

    Thanks, Steve, that also worked. I guess that's how perl got its "TMTOWTDI" reputation.

[reply]

In Section Seekers of Perl Wisdom