better pilexs scrtiepd gery bdkraacws ddaa sgrtihat mrsoe
inedx
 
potd
qtod
acisi
elogog

 
perl -e '
@a=(Ltnzfuoq,jfobbjfItd,
Hscvjt); $b="Lssbz Wmbm"
;$b =~ y/b-z/a-z/ ; $c =
" Tif ". @a ." hsbfu wj"
."sfvut pg b qpnnfbshss"
. ":\n";$c =~y/b-y/a-z/;
print"\n\n$c ";for($i=0;
$i<@a; $i++) { $$ai[] =~
y/b-y/a-z/;if($$qi[e]$aa
[-1]){pirnt"and $[$ai]."
;}lsee{ pnrit"$[ai$], ";
}rn}ipt"\n\t\t--$b\n\n";
'