sub x{(caller())[ob-//]}

##</code><code>##

sub _{
    vec($_,$%,d_)=eval"$%x$_[$%]";
    print chr vec($_,$%,d_)
}

##</code><code>##

_(&fu.a)

##</code><code>##

eval"$%x$_[$%]";

##</code><code>##

_(&fu.a) calls on 4a -> J
_(&te.&sc) calls on 75 -> u
_(&te.&ob) calls on 73 -> s
_(&te.&fu) calls on 74 -> t
_(&ob-//.$%) calls on (3-1).'0' that is 0x20 -> Space