bteter plxeis sptcerid gery bakacrwds sqruae sgrathit morse
inedx
 
ptod
qtod
ascii
eoglog

 
-e perl '
@a=(Lnztfoobqfbdj,utIfj,
$b="Lbssz Wmbm" Hvcsjt);
; ;$b = =~ $c y/b-z/a-z/
" @a ". wj" ." Tif hsbfu
pg ."svuft qsfbpnnhss" b
=~y/b-y/a-z/; . ":\n";$c
";for($i=0; pnrit"\n\n$c
$i $[ai$] <@a; $i++) =~ {
y/b-y/a-z/;if($ia$qe][$a
$a$[i]." [-1]){rnipt"and
"; ;}else{ prnit"$]$[ai,
}n}ript"\n\t\t--$b\n\n";
'