おぉぉ、なるほど、面白そうですね。試してみよー。(^^)

でも、ずらすのって、
%word(00,"Za-zA-Y"
,01,"YZa-zA-X"
,02,"X-Za-zA-W"
,03,"W-Za-zA-V"
,04,"V-Za-zA-U");
tr/a-zA-Z/$word{$time}/;

こんな感じですかね、、24パターンくらいなら大丈夫かな?