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

sub _{fork?wait:return$_ for@_}
print _(split //,qq{Just another Perl Hacker,});

[download]
This is mostly inspired by my first implementation of the "amb" operator for the RosettaCode project, but also partly by mjd's amazing japh http://perl.plover.com/obfuscated/solution.html Mine is obviously much simpler... but still moderately cool.

Back to Obfuscated Code