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

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