This also prints the control characters 0x1f and 0x02. ActiveState perl 633 5.6.1 on Windows 2000.

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