Select Code to Download

Alphabet:    abcdef
Translation: d a  c

my $alpha = "abcdef";
my $cipher = "abcadbbe";
...
    $tr = extend_translation( $alpha, $tr, $cipher, $word );
    # after this step, $tr = "deabf "
}

my $alpha = "elprxyz";
my $cipher = "zyxe";
...
# lyzxrep: perl
# lzxyrep: perl
# lzyzrep: perl