Obfuscated Perl Contest

[Bernhard Peissl]

Hi!

$Old_MacDonald = q#print #; $had_a_farm = (q-q:Just another Perl hacker,:-);
s/^/q[Sing it, boys and girls...],$Old_MacDonald.$had_a_farm/eieio;

http://www.itknowledge.com/tpj/obfusc-5.html :-))

Genial :-)

liebe Grüsse
Bernhard