#BEGIN {                         # TODO
    unless ( caller() ) {              # Modulino for development
        exec q(cd ../..; prove  ./t/); #run proove from dist root 
    }
#}

##</code><code>##

BEGIN { warn "Caller Begin: ",defined caller(0) }
warn "Caller Normal: ",defined caller();

##</code><code>##

Caller Begin: 1 at /home/lanx/...
Caller Normal:  at /home/lanx/...

##</code><code>##

BEGIN {                         # TODO
    unless ( caller(2) ) {              # Modulino for development
        exec q(cd ../..; prove  ./t/); #run proove from dist root 
    }
}