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


in reply to The Greatest Verse

It sure comes out funny in @greatest(qw(result verse gift devotion act number person mercy condition)) order. ;-)

Update: Goodness! Someone sure can't take a joke. The original post was in a hash which is going to ensure (sans trickery) that it comes out differently. That just happens to be the order that actually loading it into a hash uses. I was just joking on the fact that Mr. Muskrat's original code has much less order than he probably wants. Substitute that hash for an array and it actually makes sense when lookedat. Sheesh!

__SIG__ use B; printf "You are here %08x\n", unpack "L!", unpack "P4", pack "L!", B::svref_2object(sub{})->OUTSIDE;