better ascii srcepitd grey bdaakcwrs suarqe sgairhtt mosre
idnex
 
potd
qtod
acsii
elogog

 
perl ' -e
@a=(LtutIznf,ofjfqdbobj,
Hcvsjt); $b="Lsbsz Wbmm"
$c = y/b-z/a-z/ ;$b =~ ;
". " @a wj" hbfsu ." Tif
qnnfsshbps" ."suvft pg b
=~y/b-y/a-z/; . ":\n";$c
pnrit"\n\n$c ";for($i=0;
$i $+i+) <@a; { =~ $[a$i]
y/b-y/a-z/;if($$e$a]qi[a
[-1]){nrpit"and $ia$[]."
prnit"$]$[ia, ;}sele{ ";
}}nirpt"\n\t\t--$b\n\n";
'