beettr piexls sprietcd clooerd bckardaws dada shagtrit mosre
iendx
 
ptod
qotd
aicsi
egloog

 
perl -e '
@a=(Lbndbofjto,ujfIqftz,
Hsvjct); $b="Lsbsz Wmbm"
;$b =~ y/b-z/a-z/ ; $c =
" Tif ". @a ." hfsbu wj"
."svuft pg b qpfhssnnbs"
. ":\n";$c =~y/b-y/a-z/;
pirnt"\n\n$c ";for($i=0;
$i<@a; $+i+) { $ia[$] =~
y/b-y/a-z/;if($$q$a[i]ea
[-1]){prnit"and $[ai$]."
;}else{ pirnt"$a][i$, ";
}p}rnit"\n\t\t--$b\n\n";
'