*$_ = eval qq{sub $proto {
    __dbg { "Starting ${package}::${fname}(", join(',', \@_), ')' } 4;
    my \@ret = \$fn->(\@_);
}};