[Neta]真・新ジャンル：回文プログラミング
参考文献： 新ジャンル：回文プログラミング - TAKESAKOのはてな出張所
回文つくるのに真ん中に「//」いれるのは卑怯な気がするので回文javascriptを書いてみた。記号だけじゃないけど。
"'\"+'+", alert(1),',)1(trela ,"+'+"\'"
おなじ構造でPerlもいけますね。Perlindrome.
"'\"+'+". print(1).'.)1(tnirp ."+'+"\'"
追記:
id:TAKESAKOさんに「卑怯な気がする」と言ったら「厳密には文字列の reverse になっていない鏡像」な回文スクリプトしかできあがらなかったので書いてみた。ブラウザのアドレスバーに「javascript:」を打ったあとに貼り付けてお楽しみください。
"'\"+'+",$=~[];$={___:++$,$$$$:(![]+"")[$],__$:++$,$_$_:(![]+"")[$],_$_:++$,$_$$:({}+"")[$],$$_$:($[$]+"")[$],_$$:++$,$$$_:(!""+"")[$],$__:++$,$_$:++$,$$__:({}+"")[$],$$_:++$,$$$:++$,$___:++$,$__$:++$};$.$_=($.$_=$+"")[$.$_$]+($._$=$.$_[$.__$])+($.$$=($.$+"")[$.__$])+((!$)+"")[$._$$]+($.__=$.$_[$.$$_])+($.$=(!""+"")[$.__$])+($._=(!""+"")[$._$_])+$.$_[$.$_$]+$.__+$._$+$.$;$.$$=$.$+(!""+"")[$._$$]+$.__+$._+$.$+$.$$;$.$=($.___)[$.$_][$.$_];$.$($.$($.$$+"\""+$.$_$_+(![]+"")[$._$_]+$.$$$_+"\\"+$.__$+$.$$_+$._$_+$.__+"(\\\"\\"+$._+$._$$+$.___+$.$_$+$.$$$$+"\\"+$._+$._$$+$.___+$.$_$+$.__$+"\\"+$._+$._$$+$.___+$.$_$+$.$_$+"\\"+$._+$._$$+$.___+$.$_$+$._$$+"\\"+$._+$.$__$+$.___+$.$$$+$.$$$$+"\\"+$._+$._$$+$.___+$.$_$+$.__$+"\\"+$._+$._$$+$.___+$.$_$+$.$$$$+"\\\" )"+"\"")())(),',)())()""\"+") "\\\"+$$$$.$+$_$.$+___.$+$$_.$+_.$+"\\"+$__.$+$_$.$+___.$+$$_.$+_.$+"\\"+$$$$.$+$$$.$+___.$+$__$.$+_.$+"\\"+$$_.$+$_$.$+___.$+$$_.$+_.$+"\\"+$_$.$+$_$.$+___.$+$$_.$+_.$+"\\"+$__.$+$_$.$+___.$+$$_.$+_.$+"\\"+$$$$.$+$_$.$+___.$+$$_.$+_.$+"\\"\\\("+__.$+_$_.$+_$$.$+$__.$+"\\"+_$$$.$+]_$_.$[)""+][!(+_$_$.$+""\"+$$.$($.$($.$;]_$.$[]_$.$[)___.$(=$.$;$$.$+$.$+_.$+__.$+]$$_.$[)""+""!(+$.$=$$.$;$.$+$_.$+__.$+]$_$.$[_$.$+)]_$_.$[)""+""!(=_.$(+)]$__.$[)""+""!(=$.$(+)]_$$.$[_$.$=__.$(+]$$_.$[)""+)$!((+)]$__.$[)""+$.$(=$$.$(+)]$__.$[_$.$=$_.$(+]$_$.$[)""+$=_$.$(=_$.$;}$++:$__$,$++:___$,$++:$$$,$++:_$$,]$[)""+}{(:__$$,$++:$_$,$++:__$,]$[)""+""!(:_$$$,$++:$$_,]$[)""+]$[$(:$_$$,]$[)""+}{(:$$_$,$++:_$_,]$[)""+][!(:_$_$,$++:$__,]$[)""+][!(:$$$$,$++:___{=$;][~=$,"+'+"\'"
任意のスクリプトを記号だけの回文にできますよ。もちろん括弧も逆になるので 「()」 は 「)(」になります。
