You may have seen my Ruby-based Ook/Bf interpreter, linked from this page.
Yesterday, I happened upon the following (also Ruby-based) Bf interpreter
on <a href=”this“>www.cs.auc.dk/~larsch/ruby/”>this
disturbed gentleman’s site</a>. I’m at a loss for words.
:)

<PRE> a=’p=0;t=""\*30000;’;$<.each\_byte{\|c\|a<<({?>=>"p1;",?<=>"p-=1;",?=> "t\[p\]+=1;",?~~>"t\[p\]~~=1;",?\[=>"while t\[p\]>0;",?\]=>"end;",?.=>"putc t\[p\];", ?,=>"t\[p\]=STDIN.getc\|\|0;“}\|\|”")};eval a </PRE>