Select Code to Download

use PadWalker qw( peek_my peek_our );
use strict;
...
printf "Name: %s\n", name($subref);