$s = join'', 'a'..'z';;

$s =~ tr[abcdefghijklmnopqrstuvwxyz]
        [96537214058751230498763202];;

print $s;;
96537214058751230498763202