Palindromic Quine by 51b

-define(S,"-define(S,%.)])T(esrever:stsil|43,T[(tamrof:oi,]S?|43[++)0,01,S?(tfel:gnirts=T>-)(m
.)]0/m[(tropxe-
.)p(eludom-
.)").
-module(p).
-export([m/0]).
m()->T=string:left(?S,10,0)++[34|?S],io:format([T,34|lists:reverse(T)]).%,S(enifed-",S(enifed-

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page