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"
or like a psychotic pervert?