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

 
perl ' -e
@a=(Lbzjoftt,Inqbujfodf,
Hvcsjt); $b="Lbssz Wbmm"
$c ; ;$b = =~ y/b-z/a-z/
." @a ". Tif " wj" hsfbu
pg ."suvft b qsphsbnnfs"
":\n";$c . =~y/b-y/a-z/;
print"\n\n$c ";for($i=0;
$i { $a[$i] <@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";
'