%:/*: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,

",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%*/



The following program can be compiled in ten different programming languages—and it prints something different in all of them. The languages: C, C++, Perl, TeX, LaTeX, PostScript, sh, bash, zsh and Prolog:Snarfed (with awe and respect) from pts oldalai