in reply to fun with closure

Explaination moved to spoiler
-----
perl -e 'print sub { "Hello @{[shift]}!\n" }->("World")'

[download]

In Section Obfuscated Code