記号だけで書いた、 Ruby でも Perl でも JS でもある、 Quine
$_='__$=(/_/[__$]+"")[_$$*(___=_+(__=_+_))-_];$_$=$$($$_[_]+$$_[___]+$$_[$]+_$[
$]+$$_[_]+_$[_]+"("+_$[$]+_$[_]+$$_[___]+$$$[___]+$__+$$$[_]+__$+$$_[___]+")")(
);_$_="%"+__+(_$$+__);__="%"+_$$+$__+_$_;$$($_$("_="+$$_[$]+"%"+(___+___)+(___+
___+_+_)+_$[___+_+_]+$$$[___]+"."+$$$[_]+$$$[_+_]+$$_[___]+$$_[_]+$$_[$]+";_=_?
_:"+__$+$$_[_]+_$[_$$]+_$[_$$+_]+$$_[$]+";_("+_$_+"$_="+__)+$_+$_$(__+";$___="+
__+$___+__+$___+_$_+")"))();';$___=';$/*$.;$/=$_;%#=~("(?{".("+)).[|`{!`||"^"[[
@@/^<_~][^").".".("{"^"_")."/.".("||``{!!!`||"^"^[[<_~~~][^").".".("{!!!"^"_~~~
").".".("|||"^"^[^").".".("{!!!"^"_~~~").".".("|/|"^"^%^")."})")#;_=$$/$$;$__=(
___=(__=_+_)<<_)<<_;$><<"$_="+(_=""<<(___<<__+_)+$__-_)+($_+_+";$___="+_+$___+_
+$___<<__+$__)#*/=_=+[];$$=""+{};_$=""+[][++_];$$$=""+!_;$$_=""+!$;$$=_[__$=($_
_=$$[_$$=_+_+_+_+_])+$$[_]+_$[_]+$$$[_+_+_]+$$[_$$+_]+$$_[_]+_$[$]+$__+$$_[$]+$
$[_]+$$_[_]][__$];$$($_)()';$/*$.;$/=$_;%#=~("(?{".("+)).[|`{!`||"^"[[@@/^<_~][
^").".".("{"^"_")."/.".("||``{!!!`||"^"^[[<_~~~][^").".".("{!!!"^"_~~~").".".("
|||"^"^[^").".".("{!!!"^"_~~~").".".("|/|"^"^%^")."})")#;_=$$/$$;$__=(___=(__=_
+_)<<_)<<_;$><<"$_="+(_=""<<(___<<__+_)+$__-_)+($_+_+";$___="+_+$___+_+$___<<__
+$__)#*/=_=+[];$$=""+{};_$=""+[][++_];$$$=""+!_;$$_=""+!$;$$=_[__$=($__=$$[_$$=
_+_+_+_+_])+$$[_]+_$[_]+$$$[_+_+_]+$$[_$$+_]+$$_[_]+_$[$]+$__+$$_[$]+$$[_]+$$_[
_]][__$];$$($_)()