- or download this
#BEGIN { # TODO
unless ( caller() ) { # Modulino for development
exec q(cd ../..; prove ./t/); #run proove from dist root
}
#}
- or download this
BEGIN { warn "Caller Begin: ",defined caller(0) }
warn "Caller Normal: ",defined caller();
- or download this
Caller Begin: 1 at /home/lanx/...
Caller Normal: at /home/lanx/...
- or download this
BEGIN { # TODO
unless ( caller(2) ) { # Modulino for development
exec q(cd ../..; prove ./t/); #run proove from dist root
}
}