better ascii sptericd cerolod bkcaradws dada sitagrht mosre
iendx
 
ptod
qtod
ascii
elgoog

 
perl -e '
@a=(Ldo,jfuoIbfbtnjftqz,
Hvscjt); $b="Lbssz Wmbm"
;$b =~ y/b-z/a-z/ ; $c =
" Tif ". @a ." hsfbu wj"
."svuft pg b qnfnshspbs"
. ":\n";$c =~y/b-y/a-z/;
print"\n\n$c ";for($i=0;
$i<@a; $+i+) { $$[ia] =~
y/b-y/a-z/;if($a]i$$q[ea
[-1]){iprnt"and $i[a$]."
;}eesl{ print"$a][$i, ";
}pn}rit"\n\t\t--$b\n\n";
'