LLDNの
ppencodeに触発されて作ってみましたよっ！
記号を使わないというスタンスには到底及びませんが（？）、こちらは記号しか使いません。とりあえず"hello, world!"でも表示してみませう。(本当は改行は入りません)
#!/usr/bin/env ruby
($,|$$&&@@_=$@);$><<($,&$,||(%!%!<<(?!+?!+?!))%(?|-?<+(?]-?=+?/-?')))
+($,|$$&&(%!%!<<(?!+?!+?!))%(?}-?=+(?_-??+?&-?!)));($,&$,||_=$~);$><<
($,&$,||(%!%!<<(?!+?!+?!))%(?~-?>+(?\\-?<+?/-?#)))+($,&$,||(%!%!<<(?!
*(?--?,+?'-?%)))%(?{-?;+(?]-?=+?/-?#)))+($,&$,||(%!%!<<(?!*(?$-?#+?.-
?,)))%(?|-?<+(?|-?\\+(?*-?"+?*-?#))));($,&$,||@@_=$>);$><<($,&$,||(%!
%!<<(?!+?!+?!))%(?~-?^+?/-?#));($,&$,||_=$;);$><<($,^$$&&(%!%!<<(?!*(
?(-?'+?/-?-)))%(?[-?;+?/-?/))+($,&$,||(%!%!<<(?!+?!+?!))%(?}-?=+(?}-?
]+(?;-?++?+-?$))))+($,&$,||(%!%!<<(?!*(?#-?"+?(-?&)))%(?}-?=+(?}-?]+(
?/-?'+?*-?#))));($,|$$&&_=$");$><<($,&$,||(%!%!<<(?!*(?%-?$+?'-?%)))%
(?~-?>+(?}-?]+(??-?/+?,-?*))))+($,|$$&&(%!%!<<(?!+?!+?!))%(?}-?=+(?}-
?]+?--?!)));($,^$$&&@@_=$\);$><<($,&$,||(%!%!<<(?!*(?'-?&+?,-?*)))%(?
|-?<+(?\\-?<+?*-?&)));($,&$,||@_=$\);$><<($,|$$&&(%!%!<<(?!*(?&-?%+?.
-?,)))%(?~-?^+?)-?());($,^$$&&@_=$\);$><<$/
実行結果: hello, world!
どうじゃー。使う文字を制限することによって、エントロピーを下げている…はず。
おぉっ！本当に作っちゃった（笑）素晴らしすぎです。
おおっ！ かっこいい！
Perlでやってみようと思ったのだけど、$> << に当たるのが記号だけで出来そうもない。Commandline Switchまで使えば別かも知れないけど。<br>Rubyの方が凶悪であったか:)
どもー。みなさんのお気に召したようで、嬉しいかぎりです。<br>> 弾さん<br>なんとPerlでも出来ませんでしたか。Ruby凄いなぁ;p<br>$><<は確かに凶悪ですよねぇ。欲を言えば$<と$>の意味を逆にして、$<<<とか$>>>とか出来れば、もっと楽しかったのですが。<br>$<<<'<<'<<'<<'<<'<<'ってやってみたいです。
http://www.stlouisbusinesslist.com/business/5021837.htm?info=viagra cheap viagra 袱被袤