Greetings, fellow Monks!

This is my second Obfuscated Perl attempt. My first Obfuscated Perl Attempt was not too terribly obfuscated. My hopes are that this is a bit more challenging to work through.

sub _{'h'};%_=('p');@_=qw(a);$_='j';$;=\*_;
print  ${*${;}},@{*${;}},%{*${;}},&{*${;}};
[download]

-Daruma