@Perl=('Obfuscation'=>
q;Art of the unreadable;);
print "$Perl[0] done for fun"