Excluindo programas triviais, qual código compila no maior número de idiomas?
(Por "trivial", pretendo excluir respostas como o programa ou texto vazio que será repetido diretamente.)
O código a seguir aparentemente compila em todas as seguintes linguagens de programação (e imprime algo diferente em cada uma): C, C ++, Perl, TeX, LaTeX, PostScript, sh, bash, zsh e Prolog.
%:/*:if 0;"true" +s ||true<</;#|+q|*/include<stdio.h>/*\_/
{\if(%)}newpath/Times-Roman findfont 20 scalefont setfont(
%%)pop 72 72 moveto(Just another PostScript hacker,)show((
t)}. t:-write('Just another Prolog hacker,'),nl,halt. :-t.
:-initialization(t). end_of_file. %)pop pop showpage(-: */
int main(){return 0&printf("Just another C%s hacker,\n",1%
sizeof'2'*2+"++");}/*\fi}\csname @gobble\endcsname{\egroup
\let\LaTeX\TeX\ifx}\if00\documentclass{article}\begin{doc%
ument}\fi Just another \LaTeX\ hacker,\end{document}|if 0;
/(J.*)\$sh(.*)"/,print"$1Perl$2$/"if$_.=q # hack the lang!
/
sh=sh;test $BASH_VERSION &&sh=bash;test $POSIXLY_CORRECT&&
sh=sh;test $ZSH_VERSION && sh=zsh;awk 'BEGIN{x="%c[A%c[K"
printf(x,27,27)}';echo "Just another $sh hacker," #)pop%*/
São 10 idiomas diferentes. Encontrei-o via pts oldalai (que também tem um magnífico poema de Natal escrito em C, C ++, Perl e TeX). Alguém pode fazer melhor?