Okay, I based this off an obfu I saw somewhere... I tried looking for it but couldn't :(

Anyway, BEFORE running this snippet, predict what it will output....

# Set environment variables
$$=\$,;$,=$;


# Begin POD documentation
=cut
;
; # Usage:
; #   require "script.pl";
;     print "\"You are $$$,\" said the coach.";
;
=cut
# Above Line Ends POD


# Send the user some output
print "Just Another Perl Hacker";
[download]