À l'exception des programmes triviaux, quel code compile dans le plus grand nombre de langues?
(Par «trivial», j'entends exclure des réponses telles que le programme vide ou le texte qui seront répercutés directement.)
Le code suivant compile apparemment dans tous les langages de programmation suivants (et imprime quelque chose de différent dans chacun): C, C ++, Perl, TeX, LaTeX, PostScript, sh, bash, zsh et 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%*/
C'est 10 langues différentes. Je l'ai trouvé via pts oldalai (qui a aussi un magnifique poème de Noël écrit en C, C ++, Perl et TeX). Quelqu'un peut-il faire mieux?