>>512
my @key = ('a'..'z');
my $keynum = scalar @key;

# my $d = 675;
my $code = $key[$d/$keynum].$key[$d%$keynum];

# 繰り返し使うなら、配列の方が負荷は軽いと思う。

>>526
文字コードとPerlバーションを書くべし。

>>527
JISコードへのコンバートはしなくていいの？