<< 48/50 >>
First Last

Symbolic polyglot quine

Ruby Quine の本体、で、後はコメントアウト

  $_='__$=(/_/[__$]+"")[_$$*(___=_+(__=_+_))-_];$_$=$$($$_[_]+$$_[___]+$$_[$]+_$[
  $]+$$_[_]+_$[_]+"("+_$[$]+_$[_]+$$_[___]+$$$[___]+$__+$$$[_]+__$+$$_[___]+")")(
  );_$_="%"+__+(_$$+__);__="%"+_$$+$__+_$_;$$($_$("_="+$$_[$]+"%"+(___+___)+(___+
  ___+_+_)+_$[___+_+_]+$$$[___]+"."+$$$[_]+$$$[_+_]+$$_[___]+$$_[_]+$$_[$]+";_=_?
  _:"+__$+$$_[_]+_$[_$$]+_$[_$$+_]+$$_[$]+";_("+_$_+"$_="+__)+$_+$_$(__+";$___="+
  __+$___+__+$___+_$_+")"))();';$___=';$/*$.;$/=$_;%#=~("(?{".("+)).[|`{!`||"^"[[
  @@/^<_~][^").".".("{"^"_")."/.".("||``{!!!`||"^"^[[<_~~~][^").".".("{!!!"^"_~~~
  ").".".("|||"^"^[^").".".("{!!!"^"_~~~").".".("|/|"^"^%^")."})")#;_=$$/$$;$__=(
  ___=(__=_+_)<<_)<<_;$><<"$_="+(_=""<<(___<<__+_)+$__-_)+($_+_+";$___="+_+$___+_
  +$___<<__+$__)#*/=_=+[];$$=""+{};_$=""+[][++_];$$$=""+!_;$$_=""+!$;$$=_[__$=($_
  _=$$[_$$=_+_+_+_+_])+$$[_]+_$[_]+$$$[_+_+_]+$$[_$$+_]+$$_[_]+_$[$]+$__+$$_[$]+$
  $[_]+$$_[_]][__$];$$($_)()';$/*$.;$/=$_;%#=~("(?{".("+)).[|`{!`||"^"[[@@/^<_~][
  ^").".".("{"^"_")."/.".("||``{!!!`||"^"^[[<_~~~][^").".".("{!!!"^"_~~~").".".("
  |||"^"^[^").".".("{!!!"^"_~~~").".".("|/|"^"^%^")."})")#;_=$$/$$;$__=(___=(__=_
  +_)<<_)<<_;$><<"$_="+(_=""<<(___<<__+_)+$__-_)+($_+_+";$___="+_+$___+_+$___<<__
  +$__)#*/=_=+[];$$=""+{};_$=""+[][++_];$$$=""+!_;$$_=""+!$;$$=_[__$=($__=$$[_$$=
  _+_+_+_+_])+$$[_]+_$[_]+$$$[_+_+_]+$$[_$$+_]+$$_[_]+_$[$]+$__+$$_[$]+$$[_]+$$_[
  _]][__$];$$($_)()

Ruby は素直に記号だけで出力できるので割と簡単