-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).