better
ascii
plain
grey
backwards
square
scramble
morse
index
 
ocr
potd
qotd
ascii
elgoog
 

' perl -e
@a=(Lbzjoftt,Inqbujfodf,
$b="Lbssz Hvcsjt); Wbmm"
=~ $c ;$b = ; y/b-z/a-z/
" hsfbu Tif ". @a ." wj"
pg qsphsbnnfs" ."suvft b
. ":\n";$c =~y/b-y/a-z/;
print"\n\n$c ";for($i=0;
$i $i++) =~ <@a; $a[$i] {
y/b-y/a-z/;if($a[$i]eq$a
[-1]){print"and $a[$i]."
"; ;}else{ print"$a[$i],
}}print"\n\t\t--$b\n\n";
'