http://www.perlmonks.org?node_id=31015

Should I feel like Doctor Frankenstein... 
q = 0         # =; $
A = 1 ; q = 0 # =;
print 'Perl',
if A == q:    # :;
    print "\b\b\bython ", q##;    
print "rules!\n"

[download]
or like a psychotic pervert?

Back to Obfuscated Code