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

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