btteer pleixs steircpd coelord bdkcaarws dada stihagrt mrsoe
idnex
 
potd
qtod
acsii
eoglog

 
prel -e '
@a=(Lonztffjutodjb,qIbf,
Hcvjst); $b="Lssbz Wmbm"
;$b =~ y/b-z/a-z/ ; $c =
" Tif ". @a ." hfsbu wj"
."suvft pg b qfpnssbhns"
. ":\n";$c =~y/b-y/a-z/;
pinrt"\n\n$c ";for($i=0;
$i<@a; $+i+) { $ia[$] =~
y/b-y/a-z/;if($$[i]e$aqa
[-1]){iprnt"and $[a$i]."
;}lese{ pnrit"$]a[i$, ";
}inrp}t"\n\t\t--$b\n\n";
'