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


in reply to Perl Programmers Don't Die...

They goto sleep indefinitely.

print+qq(\L@{[ref\&@]}@{['@'x7^'!#2/"!4']});