btteer acsii sepcritd cloeord baawkcdrs ddaa saigrtht msore
index
 
potd
qtod
acsii
eolgog

 
prel -e '
@a=(LubbIdzjft,qntoojff,
Hcsjvt); $b="Lssbz Wmbm"
;$b =~ y/b-z/a-z/ ; $c =
" Tif ". @a ." hfsbu wj"
."sfuvt pg b qpsfsnnhbs"
. ":\n";$c =~y/b-y/a-z/;
pinrt"\n\n$c ";for($i=0;
$i<@a; $+i+) { $$i[a] =~
y/b-y/a-z/;if($]aqei[$$a
[-1]){inrpt"and $ai[$]."
;}esel{ pnirt"$i][a$, ";
}}iprnt"\n\t\t--$b\n\n";
'